diff --git a/Bindings/GLFW.hsc b/Bindings/GLFW.hsc
--- a/Bindings/GLFW.hsc
+++ b/Bindings/GLFW.hsc
@@ -671,7 +671,7 @@
 #endif
 
 #if defined(GLFW_EXPOSE_NATIVE_X11)
-#ccall glfwGetX11Display , Ptr <GLFWwindow> -> IO (Ptr display)
+#ccall glfwGetX11Display , IO (Ptr display)
 #ccall glfwGetX11Adapter , Ptr <GLFWwindow> -> IO Word64
 #ccall glfwGetX11Monitor , Ptr <GLFWwindow> -> IO Word64
 #ccall glfwGetX11Window  , Ptr <GLFWwindow> -> IO Word64
@@ -683,10 +683,10 @@
 #ccall glfwGetX11SelectionString , IO CString
 
 #else
-p'glfwGetX11Display :: FunPtr (Ptr C'GLFWwindow -> IO (Ptr display))
+p'glfwGetX11Display :: FunPtr (IO (Ptr display))
 p'glfwGetX11Display = nullFunPtr
 
-c'glfwGetX11Display :: Ptr C'GLFWwindow -> IO (Ptr display)
+c'glfwGetX11Display :: IO (Ptr display)
 c'glfwGetX11Display =
   error $ "c'glfwGetX11Display undefined! -- "
        ++ "Did you use the wrong glfw3native API?"
diff --git a/bindings-GLFW.cabal b/bindings-GLFW.cabal
--- a/bindings-GLFW.cabal
+++ b/bindings-GLFW.cabal
@@ -1,5 +1,5 @@
 name:         bindings-GLFW
-version:      3.3.9.1
+version:      3.3.9.2
 category:     Graphics
 
 author:       Brian Lewis <brian@lorf.org>