[project @ 2002-08-08 22:29:28 by reid]

[project @ 2002-08-08 22:29:28 by reid]
Hugs provides makeForeignPtr instead of newForeignPtr.

It is hoped that these macros overcome the difference.

+ #ifdef __HUGS__
+ #define MAKE_ARRAY(x) makeForeignPtr (x) free
+ #else
+ #define MAKE_ARRAY(x) newForeignPtr (x) (free (x))
+ #endif

I could probably get away with introducing a Haskell functions instead
of a macro..

[Untested since Data.Array.Base requires the pattern guard extension
so I can't load it.  Still, I think this will be ready to go once we
fix D.A.B]