[project @ 1996-06-30 16:31:21 by partain]

[ghc-hetmet.git] / ghc / includes / SMClosures.lh

diff --git a/ghc/includes/SMClosures.lh b/ghc/includes/SMClosures.lh
index fc20664..58e1907 100644 (file)
--- a/ghc/includes/SMClosures.lh
+++ b/ghc/includes/SMClosures.lh
@@ -700,7 +700,7 @@ do {                                 \
 EXTDATA_RO(StablePointerTable_info);
 EXTDATA_RO(EmptyStablePointerTable_info);
 EXTDATA(EmptySPTable_closure);
-extern int ValidateSPTable PROTO(( P_ SPTable ));
+int ValidateSPTable PROTO(( P_ SPTable ));
 
 #  define CHECK_SPT_InfoTable( closure ) \
   ASSERT( (*((PP_) (closure)) == EmptyStablePointerTable_info && (closure == EmptySPTable_closure) ) || \