1 patch for repository http://code.haskell.org/gstreamer:
Mon Apr 23 09:58:12 FET 2012 Sergei Trofimovich <sly...@community.haskell.org>
* 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
New patches:
[fix build failure on ghc-7.4 (Eq constraints)
Sergei Trofimovich <sly...@community.haskell.org>**20120423065812
Ignore-this: a9f47c04fb7463fc7874a9f49639f93a
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
] hunk ./Media/Streaming/GStreamer/Core/Buffer.chs 208
liftIO $ liftM castPtr $
{# get GstBuffer->data #} ptr
-marshalGetNum :: (BufferClass bufferT, Integral intT, Num numT)
+marshalGetNum :: (BufferClass bufferT, Integral intT, Num numT, Eq numT)
=> (Ptr Buffer -> IO intT)
-> numT
-> bufferT
hunk ./Media/Streaming/GStreamer/Core/Buffer.chs 220
then Just n
else Nothing
-marshalGetNumM :: (BufferClass bufferT, Integral intT, Num numT, MonadIO m)
+marshalGetNumM :: (BufferClass bufferT, Integral intT, Num numT, Eq numT, MonadIO m)
=> (Ptr Buffer -> IO intT)
-> numT
-> MiniObjectT bufferT m (Maybe numT)
Context:
[fix repository location
Daniel Wagner <dan...@wagner-home.com>**20120213171319
Ignore-this: 702edfa8a1856f5540f8fa60fc2bb566
]
[TAG 0.12.1
Duncan Coutts <dun...@community.haskell.org>**20110912114824
Ignore-this: 9040fc0856ffc2c3cdf535e1d8a55985
]
Patch bundle hash:
1f1cc45821bcf4e15e683842ecb9c4c6cc18f5fe
------------------------------------------------------------------------------
For Developers, A Lot Can Happen In A Second.
Boundary is the first to Know...and Tell You.
Monitor Your Applications in Ultra-Fine Resolution. Try it FREE!
http://p.sf.net/sfu/Boundary-d2dvs2
_______________________________________________
Gtk2hs-devel mailing list
Gtk2hs-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gtk2hs-devel
