X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FDisassembler.h;h=b4065feca82f83a733a79968a4b5f1fbde8b4bf9;hb=748c8c8d55001e0e5bfb19230265fcc07755ba72;hp=3751dff7c930fcd02b9a4c8ea63a906690f31e75;hpb=333ddd13aebd80793bbcb746428c256dbb6a74e5;p=ghc-hetmet.git diff --git a/ghc/rts/Disassembler.h b/ghc/rts/Disassembler.h index 3751dff..b4065fe 100644 --- a/ghc/rts/Disassembler.h +++ b/ghc/rts/Disassembler.h @@ -1,6 +1,4 @@ - /* ----------------------------------------------------------------------------- - * $Id: Disassembler.h,v 1.5 2000/12/19 16:48:35 sewardj Exp $ * * (c) The GHC Team, 1998-2000 * @@ -8,9 +6,9 @@ * * ---------------------------------------------------------------------------*/ -#ifdef GHCI +#ifdef DEBUG extern int disInstr ( StgBCO *bco, int pc ); -extern void disassemble( StgBCO *bco, char* prefix ); +extern void disassemble( StgBCO *bco ); #endif