diff --git a/examples/basic_window.f90 b/examples/basic_window.f90
index 9e50fb5..f7c2c7e 100644
--- a/examples/basic_window.f90
+++ b/examples/basic_window.f90
@@ -2,7 +2,7 @@ program basic_window
     use glf90w
 
     implicit none
-    type(GLFWwindow_ptr) :: window
+    type(GLFWwindow) :: window
     integer :: major, minor, rev
 
     call glfwSetErrorCallback(handle_error)