[project @ 1996-01-11 14:06:51 by partain]

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

diff --git a/ghc/runtime/storage/SMextn.lh b/ghc/runtime/storage/SMextn.lh
index ed2e3a8..4c096a0 100644 (file)
--- a/ghc/runtime/storage/SMextn.lh
+++ b/ghc/runtime/storage/SMextn.lh
@@ -3,38 +3,36 @@
 \begin{code}
 #ifndef PAR
 
-extern void initExtensions PROTO((smInfo *sm));
+void initExtensions PROTO((smInfo *sm));
 
-#if defined(_INFO_COPYING)
+# if defined(_INFO_COPYING)
 
-extern void evacSPTable PROTO((smInfo *sm));
-extern void reportDeadMallocPtrs PROTO((StgPtr oldMPList, StgPtr new, StgPtr *newMPLust));
+void evacSPTable PROTO((smInfo *sm));
+void reportDeadMallocPtrs PROTO((StgPtr oldMPList, StgPtr new, StgPtr *newMPLust));
 
-#endif /* _INFO_COPYING */
+# endif /* _INFO_COPYING */
 
-#if defined(_INFO_COMPACTING)
+# if defined(_INFO_COMPACTING)
 
-extern void sweepUpDeadMallocPtrs PROTO((
-                                        P_ MallocPtrList,
-                                        P_ base,
-                                        BitWord *bits
-                                        ));
+void sweepUpDeadMallocPtrs PROTO((P_ MallocPtrList,
+                                 P_ base,
+                                 BitWord *bits
+                               ));
 
-#endif /* _INFO_COMPACTING */
+# endif /* _INFO_COMPACTING */
 
-extern void TrashMem PROTO(( P_ from, P_ to ));
+void TrashMem PROTO(( P_ from, P_ to ));
 
-#if defined(DEBUG)
+# if defined(DEBUG)
 
-extern void Trash_MallocPtr_Closure PROTO((P_ mptr));
-extern void Validate_MallocPtrList PROTO(( P_ MallocPtrList ));
+void Trash_MallocPtr_Closure PROTO((P_ mptr));
+void Validate_MallocPtrList PROTO(( P_ MallocPtrList ));
 
-extern void Trace_MPdies  PROTO((void));
-extern void Trace_MPlives PROTO((void));
-extern void Trace_MPforwarded PROTO(( P_ MPPtr, P_ newAddress ));
+void Trace_MPdies  PROTO((void));
+void Trace_MPlives PROTO((void));
+void Trace_MPforwarded PROTO(( P_ MPPtr, P_ newAddress ));
 
-
-#endif /* DEBUG */
+# endif /* DEBUG */
 
 #endif /* !PAR */
 \end{code}