[project @ 1997-03-14 03:08:24 by sof]

[ghc-hetmet.git] / ghc / runtime / storage / SMextn.lh

diff --git a/ghc/runtime/storage/SMextn.lh b/ghc/runtime/storage/SMextn.lh
index 4bac2bc..8e0b7f2 100644 (file)
--- a/ghc/runtime/storage/SMextn.lh
+++ b/ghc/runtime/storage/SMextn.lh
@@ -9,6 +9,7 @@ void initExtensions PROTO((smInfo *sm));
 
 void evacSPTable PROTO((smInfo *sm));
 void reportDeadForeignObjs PROTO((StgPtr oldMPList, StgPtr new, StgPtr *newMPLust));
+int  freeForeigns PROTO((StgPtr foList));
 
 # endif /* _INFO_COPYING */