X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FDisassembler.h;h=9762566c4f7cb7a491b2a91ecbd9c1b782d206f3;hb=419c1644e84d45ca66a817816982b8713d8b9763;hp=d4d05a0dc3395459d2b631d262ed68bd806a55f2;hpb=7f309f1c021e7583f724cce599ce2dd3c439361b;p=ghc-hetmet.git diff --git a/ghc/rts/Disassembler.h b/ghc/rts/Disassembler.h index d4d05a0..9762566 100644 --- a/ghc/rts/Disassembler.h +++ b/ghc/rts/Disassembler.h @@ -1,11 +1,16 @@ + /* ----------------------------------------------------------------------------- - * $Id: Disassembler.h,v 1.3 1999/02/05 16:02:37 simonm Exp $ + * $Id: Disassembler.h,v 1.7 2001/02/11 17:51:07 simonmar Exp $ * - * (c) The GHC Team, 1998-1999 + * (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