installWindowFocusCallbackGLFW :: IORef GLFWState -> Callbacks -> IO ()
installWindowFocusCallbackGLFW ref callbacks =
  whenWindow_ ref $ \glfwWin ->
    GLFW.setWindowFocusCallback  glfwWin $ Just (callbackWindowFocus ref callbacks)
installWindowFocusCallbackGLFW :: IORef GLFWState -> Callbacks -> IO ()
installWindowFocusCallbackGLFW ref callbacks =
  whenWindow_ ref $ \glfwWin ->
    GLFW.setWindowFocusCallback  glfwWin $ Just (callbackWindowFocus ref callbacks)
installWindowFocusCallbackGLFW ref callbacks =
  whenWindow_ ref $ \glfwWin ->
    GLFW.setWindowFocusCallback  glfwWin $ Just (callbackWindowFocus ref callbacks)