[project @ 2005-03-10 14:03:28 by simonmar]
[ghc-hetmet.git] / ghc / rts / Weak.h
index 75c276d..29bf356 100644 (file)
@@ -1,16 +1,15 @@
 /* -----------------------------------------------------------------------------
- * $Id: Weak.h,v 1.3 1999/02/05 16:03:04 simonm Exp $
  *
- * (c) The GHC Team, 1998-1999
+ * (c) The GHC Team, 1998-2005
  *
- * Weak pointers / finalisers
+ * Weak pointers / finalizers
  *
  * ---------------------------------------------------------------------------*/
 
-extern StgWeak *weak_ptr_list;
+#ifndef WEAK_H
+#define WEAK_H
 
-void finaliseWeakPointersNow(void);
-void scheduleFinalisers(StgWeak *w);
+void scheduleFinalizers(StgWeak *w);
 void markWeakList(void);
 
-
+#endif