diff options
| author |   Sergei Trofimovich <slyfox@gentoo.org> | 2012-03-30 03:39:30 +0000 |
|---|---|---|
| committer | Sergei Trofimovich <slyfox@gentoo.org> | 2012-03-30 03:39:30 +0000 |
| commit | 6dc47662e775d5b001ccf4df68484a5059edc6fd (patch) | |
| tree | 038695c39341d1f57e1e7b214758fd8b74bb2d4c /dev-haskell/opengl/files | |
| parent | add prefix tested keywords (diff) | |
| download | gentoo-2-6dc47662e775d5b001ccf4df68484a5059edc6fd.tar.gz gentoo-2-6dc47662e775d5b001ccf4df68484a5059edc6fd.tar.bz2 gentoo-2-6dc47662e775d5b001ccf4df68484a5059edc6fd.zip | |
Fix build failure against ghc-7.4 (reported by Christian Lask).
(Portage version: 2.2.0_alpha91/cvs/Linux x86_64)
Diffstat (limited to 'dev-haskell/opengl/files')
| -rw-r--r-- | dev-haskell/opengl/files/opengl-2.2.1.1-ghc-7.4.patch | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/dev-haskell/opengl/files/opengl-2.2.1.1-ghc-7.4.patch b/dev-haskell/opengl/files/opengl-2.2.1.1-ghc-7.4.patch new file mode 100644 index 000000000000..772b17539523 --- /dev/null +++ b/dev-haskell/opengl/files/opengl-2.2.1.1-ghc-7.4.patch @@ -0,0 +1,29 @@ +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) |