From: Sergei T. <sl...@gm...> - 2012-04-23 06:54:41
|
1 patch for repository http://code.haskell.org/gstreamer: Mon Apr 23 09:58:12 FET 2012 Sergei Trofimovich <sl...@co...> * fix build failure on ghc-7.4 (Eq constraints) Media/Streaming/GStreamer/Core/Buffer.chs:216:13: Could not deduce (Eq numT) arising from a use of `/=' from the context (BufferClass bufferT, Integral intT, Num numT) bound by the type signature for marshalGetNum :: (BufferClass bufferT, Integral intT, Num numT) => (Ptr Buffer -> IO intT) -> numT -> bufferT -> Maybe numT at Media/Streaming/GStreamer/Core/Buffer.chs:(213,1)-(218,22) Possible fix: add (Eq numT) to the context of the type signature for marshalGetNum :: (BufferClass bufferT, Integral intT, Num numT) => (Ptr Buffer -> IO intT) -> numT -> bufferT -> Maybe numT In the expression: n /= invalid In the expression: if n /= invalid then Just n else Nothing In the expression: let n = fromIntegral $ unsafePerformIO $ withMiniObject (toBuffer buffer) getAction in if n /= invalid then Just n else Nothing |