Fix build failure against ghc-7.4 [ 4 of 84] Compiling Graphics.Rendering.OpenGL.GL.GLboolean ( Graphics/Rendering/OpenGL/GL/GLboolean.hs, dist/build/Graphics/Rendering/OpenGL/GL/GLboolean.o ) Graphics/Rendering/OpenGL/GL/GLboolean.hs:27:23: Could not deduce (Eq a) arising from a use of `/=' from the context (Num a) bound by the type signature for unmarshalGLboolean :: Num a => a -> Bool at Graphics/Rendering/OpenGL/GL/GLboolean.hs:27:1-27 Possible fix: add (Eq a) to the context of the type signature for unmarshalGLboolean :: Num a => a -> Bool In the expression: (/= 0) In an equation for `unmarshalGLboolean': unmarshalGLboolean = (/= 0) Reported-by: Christian Lask diff --git a/Graphics/Rendering/OpenGL/GL/GLboolean.hs b/Graphics/Rendering/OpenGL/GL/GLboolean.hs index cab7356..cc4faa8 100644 --- a/Graphics/Rendering/OpenGL/GL/GLboolean.hs +++ b/Graphics/Rendering/OpenGL/GL/GLboolean.hs @@ -23,5 +23,5 @@ marshalGLboolean :: Num a => Bool -> a marshalGLboolean False = 0 marshalGLboolean True = 1 -unmarshalGLboolean :: Num a => a -> Bool +unmarshalGLboolean :: (Eq a, Num a) => a -> Bool unmarshalGLboolean = (/= 0)