为什么GLFW会抛出分段错误？

Question

我正在使用Haskell的GLFW库运行以下代码。以下编译并运行：

main :: IO ()
main = do
  initialize
  openWindowHint OpenGLVersionMajor 3
  openWindowHint OpenGLVersionMinor 3
  openWindowHint OpenGLForwardCompat True
  openWindowHint OpenGLProfile OpenGLCoreProfile
  openWindow (Size 400 400) [DisplayAlphaBits 8] Window
  windowTitle $= "Game Engine v 0.1"

  -- glClearColor 0.0 0.0 0.0 0.0

  gameLoop                           
  closeWindow
  terminate

gameLoop = do
  sleep 0.001
  swapBuffers
  gameLoop

但是，当我取消注释glClearColor行时，我收到了分段错误。这似乎是导致此问题的GL行 - 我已尝试在我的程序中评论glClearColor并稍后调用glClear gl_COLOR_BUFFER_BIT，并且我收到了另一个段错误。

我像这样构建我的项目：

ghc -framework Cocoa -framework IOKit Tutorial.hs

我在OS X Mavericks上运行。