[project @ 1999-03-20 17:33:07 by sof]
[ghc-hetmet.git] / ghc / rts / ForeignCall.h
1 /* -----------------------------------------------------------------------------
2  * $Id: ForeignCall.h,v 1.3 1999/02/05 16:02:41 simonm Exp $
3  *
4  * (c) The GHC Team, 1998-1999
5  *
6  * Prototypes for functions in ForeignCall.c
7  *
8  * ---------------------------------------------------------------------------*/
9
10 typedef int StablePtr;
11
12 extern void ccall ( CFunDescriptor* descriptor, void (*fun)(void) );
13 extern void hcall ( HFunDescriptor* descriptor, StablePtr fun, void* as, void* rs );
14
15