opengl - Haskell 错误：不在范围内：`GLFW.windowIsOpen'

Question

我可以在文档中找到它。

但是，每当我编译时，都会出现范围错误。

这是我的代码：

import Graphics.Rendering.OpenGL as GL
import Graphics.UI.GLFW as GLFW
import Graphics.Rendering.OpenGL (($=))
import System.Environment (getArgs, getProgName)

import Control.Monad

main = do
  GLFW.initialize
  GLFW.openWindow (GL.Size 400 400) [GLFW.DisplayAlphaBits 8] GLFW.Window
  GLFW.windowTitle $= "openGL Test"

  render <- initialize'
  loop render

  GLFW.closeWindow
  GLFW.terminate


loop render = do
  render
  p <- GLFW.getKey GLFW.ESC
  unless (p == GLFW.Press) $ do
    isOpen <- GLFW.windowIsOpen
    when isOpen $ loop render

initialize' = do
  return $ do
    GL.clear [GL.ColorBuffer]

Answer 1

您引用的文档似乎很旧。有最新版本的新文档。

windowIsOpen已经不存在了，好像已经被getParam Opened.