X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Frts%2FWeak.h;h=29bf356ae2e4be07004a4609523caf1bc9db9106;hb=c883f6969ad957637649f3af1a2b6977555bdd32;hp=25c928f1900b874093edb493756b233f85313a01;hpb=438596897ebbe25a07e1c82085cfbc5bdb00f09e;p=ghc-hetmet.git

diff --git a/ghc/rts/Weak.h b/ghc/rts/Weak.h
index 25c928f..29bf356 100644
--- a/ghc/rts/Weak.h
+++ b/ghc/rts/Weak.h
@@ -1,14 +1,15 @@
 /* -----------------------------------------------------------------------------
- * $Id: Weak.h,v 1.2 1998/12/02 13:29:01 simonm Exp $
  *
- * Weak pointers / finalisers
+ * (c) The GHC Team, 1998-2005
+ *
+ * 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