X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FPrimOps.h;h=daf96dad440162a8595a073ecb2ead75864d9a95;hb=d70c2dae6c895548594917c80c118a2f7ad0e55a;hp=ecc82bc1c02d1957705085b59dabc0a136831357;hpb=d89872a45b581ba3f086c636126a44d97ef45be6;p=ghc-hetmet.git diff --git a/ghc/includes/PrimOps.h b/ghc/includes/PrimOps.h index ecc82bc..daf96da 100644 --- a/ghc/includes/PrimOps.h +++ b/ghc/includes/PrimOps.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: PrimOps.h,v 1.102 2003/06/19 10:42:24 simonmar Exp $ + * $Id: PrimOps.h,v 1.106 2003/10/01 10:57:41 wolfgang Exp $ * * (c) The GHC Team, 1998-2000 * @@ -244,6 +244,7 @@ EXTFUN_RTS(delayzh_fast); #ifdef mingw32_TARGET_OS EXTFUN_RTS(asyncReadzh_fast); EXTFUN_RTS(asyncWritezh_fast); +EXTFUN_RTS(asyncDoProczh_fast); #endif @@ -272,7 +273,6 @@ EXTFUN_RTS(deRefStablePtrzh_fast); -------------------------------------------------------------------------- */ EXTFUN_RTS(forkzh_fast); -EXTFUN_RTS(forkProcesszh_fast); EXTFUN_RTS(yieldzh_fast); EXTFUN_RTS(killThreadzh_fast); EXTFUN_RTS(seqzh_fast); @@ -280,9 +280,11 @@ EXTFUN_RTS(blockAsyncExceptionszh_fast); EXTFUN_RTS(unblockAsyncExceptionszh_fast); EXTFUN_RTS(myThreadIdzh_fast); EXTFUN_RTS(labelThreadzh_fast); +EXTFUN_RTS(isCurrentThreadBoundzh_fast); extern int cmp_thread(StgPtr tso1, StgPtr tso2); extern int rts_getThreadId(StgPtr tso); +extern int forkOS_createThread ( HsStablePtr entry ); /* ----------------------------------------------------------------------------- Weak Pointer PrimOps. @@ -416,4 +418,5 @@ EXTFUN_RTS(mkApUpd0zh_fast); -------------------------------------------------------------------------- */ #define ForeignObj_CLOSURE_DATA(c) (((StgForeignObj *)c)->data) + #endif /* PRIMOPS_H */