patch applied (packages/Cabal): Implement openNewBinaryFile in a Compat module

[Ian Lynagh]

On Fri, Sep 19, 2008 at 06:28:57PM +0200, Matthias Kilian wrote:
> On Wed, Sep 17, 2008 at 04:44:08PM -0700, Ian Lynagh wrote:
> > Wed Sep 17 10:12:57 PDT 2008  Ian Lynagh <igloo at earth.li>
> >   * Implement openNewBinaryFile in a Compat module
> 
> This breaks the build for ghc-6.6:
> 
> [ 8 of 54] Compiling Distribution.Compat.TempFile ( /var/tmp/ghc/ghc/libraries/Cabal/Distribution/Compat/TempFile.hs, /var/tmp/ghc/ghc/libraries/bootstrapping/Distribution/Compat/TempFile.o )
> 
> /var/tmp/ghc/ghc/libraries/Cabal/Distribution/Compat/TempFile.hs:116:25:
>     Couldn't match expected type `GHC.IOBase.FD'
> 	   against inferred type `CInt'
>     In the first argument of `fdToHandle', namely `fd'
>     In the first argument of `onException', namely `fdToHandle fd'
>     In a 'do' expression:
> 	h <- (fdToHandle fd) `onException` (c_close fd)
> gmake[1]: *** [cabal-bin] Error 1
> gmake[1]: Leaving directory `/var/tmp/ghc/ghc/libraries'
> gmake: *** [stage1] Error 2

Thanks, fixed.


Thanks
Ian