X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FDisassembler.h;h=28510971179a921e7f0c0de0e887c61ad57fe223;hb=0dbbf1932d550293986af6244202cb735b2cd966;hp=3751dff7c930fcd02b9a4c8ea63a906690f31e75;hpb=333ddd13aebd80793bbcb746428c256dbb6a74e5;p=ghc-hetmet.git diff --git a/ghc/rts/Disassembler.h b/ghc/rts/Disassembler.h index 3751dff..2851097 100644 --- a/ghc/rts/Disassembler.h +++ b/ghc/rts/Disassembler.h @@ -1,16 +1,19 @@ - /* ----------------------------------------------------------------------------- - * $Id: Disassembler.h,v 1.5 2000/12/19 16:48:35 sewardj Exp $ * - * (c) The GHC Team, 1998-2000 + * (c) The GHC Team, 1998-2005 * * Prototypes for functions in Disassembler.c * * ---------------------------------------------------------------------------*/ -#ifdef GHCI +#ifndef DISASSEMBLER_H +#define DISASSEMBLER_H + +#ifdef DEBUG extern int disInstr ( StgBCO *bco, int pc ); -extern void disassemble( StgBCO *bco, char* prefix ); +extern void disassemble( StgBCO *bco ); #endif + +#endif /* DISASSEMBLER_H */