Warning: file_get_contents(/data/phpspider/zhask/data//catemap/6/haskell/8.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Opengl Can';我不能让Freeglut在Windows上与Haskell一起工作_Opengl_Haskell_Freeglut - Fatal编程技术网

Opengl Can';我不能让Freeglut在Windows上与Haskell一起工作

Opengl Can';我不能让Freeglut在Windows上与Haskell一起工作,opengl,haskell,freeglut,Opengl,Haskell,Freeglut,这是我的源代码,我正在努力工作: 在Main.hs中: import Graphics.Rendering.OpenGL import Graphics.UI.GLUT import Bindings import Data.IORef main = do (progname,_) <- getArgsAndInitialize createWindow "Hello World" reshapeCallback $= Just reshape keyboa

这是我的源代码,我正在努力工作:

在Main.hs中:

import Graphics.Rendering.OpenGL
import Graphics.UI.GLUT
import Bindings
import Data.IORef
main = do
    (progname,_) <- getArgsAndInitialize
    createWindow "Hello World"
    reshapeCallback $= Just reshape
    keyboardMouseCallback $= Just keyboardMouse
    angle <- newIORef 0.0
    displayCallback $= display
    idleCallback $= Just idle
    mouseWheelCallback $= Just mouseWheel
    mainLoop
如果我在代码中使用普通的glut32.dll并且没有任何freeglut扩展,那么它就可以工作,但是我想使用freeglut扩展

当我使用freeglut.dll时,将其重命名为glut32.dll,并将其与my.exe放在同一文件夹中,它会给出错误:

main: user error (unknown GLUT entry glutInit)
main: user error (unknown GLUT entry glutMouseWheelFunc)
当我以相同的方式使用普通glut32.dll时,我得到错误:

main: user error (unknown GLUT entry glutInit)
main: user error (unknown GLUT entry glutMouseWheelFunc)

您必须使用Mingw中的freeglut.lib/.dll或自己编译它

  • 从下载过剩

  • 将文件
    freeglut-MinGW-3.0.0-1.mp.zip\freeglut\bin\x64\freeglut.dll复制到
    C:\Windows\System32

  • 将其重命名为
    glut32.dll


  • 我刚刚解决了这个问题,希望这能帮助其他人。< / P >如果你已经解决了问题,请考虑关闭问题。谢谢。干得好。