X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FWeak.h;h=1cdb4d78115bb1e35f16b762ca3a690ca8706e2a;hb=423d477bfecd490de1449c59325c8776f91d7aac;hp=f6dbef1d4ccc05ed770d762372b83d4bcf630436;hpb=553e90d9a32ee1b1809430f260c401cc4169c6c7;p=ghc-hetmet.git

diff --git a/ghc/rts/Weak.h b/ghc/rts/Weak.h
index f6dbef1..1cdb4d7 100644
--- a/ghc/rts/Weak.h
+++ b/ghc/rts/Weak.h
@@ -1,16 +1,16 @@
 /* -----------------------------------------------------------------------------
- * $Id: Weak.h,v 1.4 1999/02/11 17:40:28 simonm Exp $
  *
- * (c) The GHC Team, 1998-1999
+ * (c) The GHC Team, 1998-2004
  *
  * Weak pointers / finalizers
  *
  * ---------------------------------------------------------------------------*/
 
-extern StgWeak *weak_ptr_list;
+#ifndef WEAK_H
+#define WEAK_H
 
 void finalizeWeakPointersNow(void);
 void scheduleFinalizers(StgWeak *w);
 void markWeakList(void);
 
-
+#endif