X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FDisassembler.h;h=9762566c4f7cb7a491b2a91ecbd9c1b782d206f3;hb=b8598510c6f7138eeadfc749ec237d9b15df9696;hp=258ccaba9d052b270e114d2d858d7769192eab34;hpb=438596897ebbe25a07e1c82085cfbc5bdb00f09e;p=ghc-hetmet.git diff --git a/ghc/rts/Disassembler.h b/ghc/rts/Disassembler.h index 258ccab..9762566 100644 --- a/ghc/rts/Disassembler.h +++ b/ghc/rts/Disassembler.h @@ -1,9 +1,16 @@ + /* ----------------------------------------------------------------------------- - * $Id: Disassembler.h,v 1.2 1998/12/02 13:28:16 simonm Exp $ + * $Id: Disassembler.h,v 1.7 2001/02/11 17:51:07 simonmar 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