[project @ 2002-02-04 20:21:16 by sof]
[ghc-hetmet.git] / ghc / rts / Prelude.h
index d251340..e83aaa8 100644 (file)
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Prelude.h,v 1.15 2001/02/14 12:59:34 simonmar Exp $
+ * $Id: Prelude.h,v 1.17 2002/01/22 13:54:22 simonmar Exp $
  *
  * (c) The GHC Team, 1998-2001
  *
@@ -22,9 +22,9 @@ extern const StgClosure PrelMain_mainIO_closure;
 
 extern DLL_IMPORT const StgClosure PrelIOBase_stackOverflow_closure;
 extern DLL_IMPORT const StgClosure PrelIOBase_heapOverflow_closure;
-extern DLL_IMPORT const StgClosure PrelIOBase_PutFullMVar_closure;
 extern DLL_IMPORT const StgClosure PrelIOBase_BlockedOnDeadMVar_closure;
 extern DLL_IMPORT const StgClosure PrelIOBase_NonTermination_closure;
+extern DLL_IMPORT const StgClosure PrelIOBase_Deadlock_closure;
 
 extern DLL_IMPORT const StgInfoTable PrelBase_Czh_static_info;
 extern DLL_IMPORT const StgInfoTable PrelBase_Izh_static_info;
@@ -69,6 +69,7 @@ extern DLL_IMPORT const StgInfoTable PrelStable_StablePtr_con_info;
 #define heapOverflow_closure      (&PrelIOBase_heapOverflow_closure)
 #define BlockedOnDeadMVar_closure (&PrelIOBase_BlockedOnDeadMVar_closure)
 #define NonTermination_closure    (&PrelIOBase_NonTermination_closure)
+#define Deadlock_closure          (&PrelIOBase_Deadlock_closure)
 
 #define Czh_static_info           (&PrelBase_Czh_static_info)
 #define Fzh_static_info           (&PrelFloat_Fzh_static_info)