Re: [Gtk2hs-devel] darcs patch: fix build failure on ghc-7.4 (Eq constraints)

[<wag...@se...>]

applied, thanks

Quoting Sergei Trofimovich <sl...@gm...>:

> 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
>