1 /* -----------------------------------------------------------------------------
2 * $Id: ForeignCall.h,v 1.3 1999/02/05 16:02:41 simonm Exp $
4 * (c) The GHC Team, 1998-1999
6 * Prototypes for functions in ForeignCall.c
8 * ---------------------------------------------------------------------------*/
10 typedef int StablePtr;
12 extern void ccall ( CFunDescriptor* descriptor, void (*fun)(void) );
13 extern void hcall ( HFunDescriptor* descriptor, StablePtr fun, void* as, void* rs );