diff options
Diffstat (limited to 'ghc/rts/Disassembler.c')
| -rw-r--r-- | ghc/rts/Disassembler.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/ghc/rts/Disassembler.c b/ghc/rts/Disassembler.c index 29d40d6479..65809d3883 100644 --- a/ghc/rts/Disassembler.c +++ b/ghc/rts/Disassembler.c @@ -5,8 +5,8 @@ * Copyright (c) 1994-1998. * * $RCSfile: Disassembler.c,v $ - * $Revision: 1.17 $ - * $Date: 2001/01/03 16:44:30 $ + * $Revision: 1.18 $ + * $Date: 2001/01/05 15:24:28 $ * ---------------------------------------------------------------------------*/ #ifdef GHCI @@ -64,6 +64,7 @@ int disInstr ( StgBCO *bco, int pc ) case bci_PUSH_AS: fprintf(stderr, "PUSH_AS " ); printPtr( ptrs[instrs[pc]] ); fprintf(stderr, " 0x%x", literals[instrs[pc+1]] ); + fprintf(stderr, "\n"); pc += 2; break; case bci_PUSH_UBX: fprintf(stderr, "PUSH_UBX "); @@ -94,6 +95,7 @@ int disInstr ( StgBCO *bco, int pc ) case bci_PACK: fprintf(stderr, "PACK %d words with itbl ", instrs[pc+1] ); printPtr( (StgPtr)itbls[instrs[pc]] ); + fprintf(stderr, "\n"); pc += 2; break; case bci_TESTLT_I: |
