Thanks!
I've added this code as a new module.
It fixed that error.
Anyway here the error message:
*[ 96 of 166] Graphics.Rendering.OpenGL.GL.BeginEnd
Determining Exports/Imports: [Graphics.Rendering.OpenGL.GL.BeginEnd]
Typing: ["Graphics.Rendering.OpenGL.GL.BeginEnd"]
Kind inference
Type inference
.....user error (
What: failure
Why: boxyMatch failure: (Jhc.Prim.IO Jhc.Basics.()) (s17 -> Jhc.Prim.IOs18)
Where: on line 100 in BeginEnd.hs_pre
in the application
Graphics.Rendering.OpenGL.GL.BeginEnd.renderPrim
Control.Exception.bracket_
in the declaration
Graphics.Rendering.OpenGL.GL.BeginEnd.renderPrimitive
= Graphics.Rendering.OpenGL.GL.BeginEnd.renderPrim
Control.Exception.bracket_ {- on line 100 -}
in the explicitly typed
Graphics.Rendering.OpenGL.GL.BeginEnd.renderPrimitive
= Graphics.Rendering.OpenGL.GL.BeginEnd.renderPrim
Control.Exception.bracket_ {- on line 100 -})
*
2009/3/31 John Meacham
Hi, thanks for the bug report, I don't have time to work on it at the moment, but a quick fix would be to create a module like the following and include it in your program. I'll add a cleaner fix to the repo at some point.
module FunPtrInstance where
import Jhc.Addr
instance Eq (FunPtr a) where FunPtr a == FunPtr b = a == b FunPtr a /= FunPtr b = a /= b
instance Ord (FunPtr a) where compare (FunPtr a) (FunPtr b) = compare a b FunPtr a <= FunPtr b = a <= b FunPtr a < FunPtr b = a < b FunPtr a > FunPtr b = a > b FunPtr a >= FunPtr b = a >= b
John
-- John Meacham - ⑆repetae.net⑆john⑈ _______________________________________________ jhc mailing list jhc@haskell.org http://www.haskell.org/mailman/listinfo/jhc