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

[ghc-hetmet.git] / ghc / runtime / c-as-asm / StgDebug.lc

diff --git a/ghc/runtime/c-as-asm/StgDebug.lc b/ghc/runtime/c-as-asm/StgDebug.lc
index f198102..537780e 100644 (file)
--- a/ghc/runtime/c-as-asm/StgDebug.lc
+++ b/ghc/runtime/c-as-asm/StgDebug.lc
@@ -808,7 +808,7 @@ printStandardShapeClosure(
 #endif
   P_ Hp    = SAVE_Hp;
 
-  extern void printClosure PROTO( (P_, int, int) );
+  void printClosure PROTO( (P_, int, int) );
   int numValues = size - vhs;
   P_ HpBot = HP_BOT;