/* -----------------------------------------------------------------------------
- * $Id: ForeignCall.h,v 1.7 1999/10/26 17:27:30 sewardj Exp $
+ * $Id: ForeignCall.h,v 1.8 1999/11/08 15:30:39 sewardj Exp $
*
* (c) The GHC Team, 1998-1999
*
extern int ccall ( CFunDescriptor* descriptor,
void (*fun)(void),
StgBCO** bco,
- char callconv
+ char callconv,
+ Capability* cap
);
extern StgAddr createAdjThunk ( StgStablePtr stableptr,