[project @ 1998-12-02 13:17:09 by simonm]
[ghc-hetmet.git] / ghc / rts / ForeignCall.h
1 /* -----------------------------------------------------------------------------
2  * $Id: ForeignCall.h,v 1.2 1998/12/02 13:28:23 simonm Exp $
3  *
4  * Prototypes for functions in ForeignCall.c
5  *
6  * ---------------------------------------------------------------------------*/
7
8 typedef int StablePtr;
9
10 extern void ccall ( CFunDescriptor* descriptor, void (*fun)(void) );
11 extern void hcall ( HFunDescriptor* descriptor, StablePtr fun, void* as, void* rs );
12
13