X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FWeak.h;h=1cdb4d78115bb1e35f16b762ca3a690ca8706e2a;hb=423d477bfecd490de1449c59325c8776f91d7aac;hp=75c276d6bafa7020540d2cfc07915f2edcaba949;hpb=7f309f1c021e7583f724cce599ce2dd3c439361b;p=ghc-hetmet.git diff --git a/ghc/rts/Weak.h b/ghc/rts/Weak.h index 75c276d..1cdb4d7 100644 --- a/ghc/rts/Weak.h +++ b/ghc/rts/Weak.h @@ -1,16 +1,16 @@ /* ----------------------------------------------------------------------------- - * $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-2004 * - * 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 finalizeWeakPointersNow(void); +void scheduleFinalizers(StgWeak *w); void markWeakList(void); - +#endif