summaryrefslogtreecommitdiff
path: root/ghc/rts/Disassembler.c
diff options
context:
space:
mode:
authorsimonmar <unknown>2004-08-13 13:11:23 +0000
committersimonmar <unknown>2004-08-13 13:11:23 +0000
commit423d477bfecd490de1449c59325c8776f91d7aac (patch)
tree2fe481e38a21be66b17539de24a4fe56daf80642 /ghc/rts/Disassembler.c
parent553e90d9a32ee1b1809430f260c401cc4169c6c7 (diff)
downloadhaskell-423d477bfecd490de1449c59325c8776f91d7aac.tar.gz
[project @ 2004-08-13 13:04:50 by simonmar]
Merge backend-hacking-branch onto HEAD. Yay!
Diffstat (limited to 'ghc/rts/Disassembler.c')
-rw-r--r--ghc/rts/Disassembler.c7
1 files changed, 2 insertions, 5 deletions
diff --git a/ghc/rts/Disassembler.c b/ghc/rts/Disassembler.c
index f8660e677b..41b66f146c 100644
--- a/ghc/rts/Disassembler.c
+++ b/ghc/rts/Disassembler.c
@@ -4,8 +4,8 @@
* Copyright (c) 1994-2002.
*
* $RCSfile: Disassembler.c,v $
- * $Revision: 1.27 $
- * $Date: 2003/03/25 17:04:09 $
+ * $Revision: 1.28 $
+ * $Date: 2004/08/13 13:09:46 $
* ---------------------------------------------------------------------------*/
#ifdef DEBUG
@@ -140,9 +140,6 @@ disInstr ( StgBCO *bco, int pc )
case bci_PUSH_APPLY_PPPPPP:
fprintf(stderr, "PUSH_APPLY_PPPPPP\n");
break;
- case bci_PUSH_APPLY_PPPPPPP:
- fprintf(stderr, "PUSH_APPLY_PPPPPPP\n");
- break;
case bci_SLIDE:
fprintf(stderr, "SLIDE %d down by %d\n", instrs[pc], instrs[pc+1] );
pc += 2; break;