static void * forkOS_createThreadWrapper ( void * entry ) { rts_lock(); rts_evalStableIO((HsStablePtr) entry, NULL); rts_unlock(); return NULL; }
static unsigned __stdcall forkOS_createThreadWrapper ( void * entry ) { rts_lock(); rts_evalStableIO((HsStablePtr) entry, NULL); rts_unlock(); return 0; }
static void * forkOS_createThreadWrapper ( void * entry ) { Capability *cap; cap = rts_lock(); rts_evalStableIO(&cap, (HsStablePtr) entry, NULL); rts_unlock(cap); return NULL; }