Repository : ssh://darcs.haskell.org//srv/darcs/packages/integer-gmp On branch : master
http://hackage.haskell.org/trac/ghc/changeset/f6e76d0cef900713a1b5be49c55004f39627de91 >--------------------------------------------------------------- commit f6e76d0cef900713a1b5be49c55004f39627de91 Author: Gabor Greif <[email protected]> Date: Fri Dec 14 10:23:26 2012 +0100 zap obsolete FIXME, fix typos >--------------------------------------------------------------- cbits/alloc.c | 8 +++----- 1 files changed, 3 insertions(+), 5 deletions(-) diff --git a/cbits/alloc.c b/cbits/alloc.c index 0d56c25..1e2d56b 100644 --- a/cbits/alloc.c +++ b/cbits/alloc.c @@ -1,11 +1,9 @@ /* ----------------------------------------------------------------------------- * - * (c) The GHC Team, 1998-2008 + * (c) The GHC Team, 1998-2012 * * ---------------------------------------------------------------------------*/ -/* TODO: do we need PosixSource.h ? it lives in rts/ not public includes/ */ -/* #include "PosixSource.h" */ #include "Rts.h" #include "gmp.h" @@ -23,8 +21,8 @@ static void initAllocForGMP( void ) __attribute__((constructor)); and co. The heap objects we use are ByteArray#s which of course have their usual header word or two. But gmp doesn't know about ghc heap objects and header words. So our allocator has to make a ByteArray# and return a pointer - to its interior! When the gmp function returns we recieve that interior - pointer. Then we look back a couple words to get the propper ByteArray# + to its interior! When the gmp function returns we receive that interior + pointer. Then we look back a couple words to get the proper ByteArray# pointer (which then gets returned as a ByteArray# and thus get tracked properly by the GC). _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
