1 /* -----------------------------------------------------------------------------
2 * $Id: ForeignCall.h,v 1.4 1999/10/15 11:03:10 sewardj 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), StgBCO** bco );
13 extern void hcall ( HFunDescriptor* descriptor, StablePtr fun, void* as, void* rs );