| 1 | Index: new-ghc/haskell-cairo/src/cairo-0.12.2/Graphics/Rendering/Cairo/Types.chs |
|---|
| 2 | =================================================================== |
|---|
| 3 | --- new-ghc.orig/haskell-cairo/src/cairo-0.12.2/Graphics/Rendering/Cairo/Types.chs |
|---|
| 4 | +++ new-ghc/haskell-cairo/src/cairo-0.12.2/Graphics/Rendering/Cairo/Types.chs |
|---|
| 5 | @@ -361,7 +361,7 @@ cFromBool :: Num a => Bool -> a |
|---|
| 6 | cFromBool = fromBool |
|---|
| 7 | |
|---|
| 8 | {-# INLINE cToBool #-} |
|---|
| 9 | -cToBool :: Num a => a -> Bool |
|---|
| 10 | +cToBool :: (Eq a, Num a) => a -> Bool |
|---|
| 11 | cToBool = toBool |
|---|
| 12 | |
|---|
| 13 | {-# INLINE cToEnum #-} |
|---|