X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FPrimOps.h;h=9576f248f3c27d2c6d732f2b4bb5cbda5cb5631a;hb=85aa72b9dc6803685595936c61f3cab6faab815a;hp=cf67e6178a2d643fea4ade56f15aa471b2ca035c;hpb=6f0dcafbc883c851aaf6d5a7c446ddaaebe23361;p=ghc-hetmet.git

diff --git a/ghc/includes/PrimOps.h b/ghc/includes/PrimOps.h
index cf67e61..9576f24 100644
--- a/ghc/includes/PrimOps.h
+++ b/ghc/includes/PrimOps.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: PrimOps.h,v 1.103 2003/07/03 15:14:57 sof Exp $
+ * $Id: PrimOps.h,v 1.104 2003/09/21 22:20:52 wolfgang Exp $
  *
  * (c) The GHC Team, 1998-2000
  *
@@ -281,6 +281,7 @@ 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);
@@ -417,4 +418,5 @@ EXTFUN_RTS(mkApUpd0zh_fast);
    -------------------------------------------------------------------------- */
 #define ForeignObj_CLOSURE_DATA(c)  (((StgForeignObj *)c)->data)
 
+
 #endif /* PRIMOPS_H */