X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FDisassembler.h;h=b4065feca82f83a733a79968a4b5f1fbde8b4bf9;hb=97417a39565b95d68a586c4eb78fed1b48e6bbe4;hp=258ccaba9d052b270e114d2d858d7769192eab34;hpb=438596897ebbe25a07e1c82085cfbc5bdb00f09e;p=ghc-hetmet.git

diff --git a/ghc/rts/Disassembler.h b/ghc/rts/Disassembler.h
index 258ccab..b4065fe 100644
--- a/ghc/rts/Disassembler.h
+++ b/ghc/rts/Disassembler.h
@@ -1,9 +1,14 @@
 /* -----------------------------------------------------------------------------
- * $Id: Disassembler.h,v 1.2 1998/12/02 13:28:16 simonm Exp $
+ *
+ * (c) The GHC Team, 1998-2000
  *
  * Prototypes for functions in Disassembler.c
  *
  * ---------------------------------------------------------------------------*/
 
-extern InstrPtr disInstr   ( StgBCO *bco, InstrPtr pc );
-extern void     disassemble( StgBCO *bco, char* prefix );
+#ifdef DEBUG
+
+extern int  disInstr   ( StgBCO *bco, int pc );
+extern void disassemble( StgBCO *bco );
+
+#endif