diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-04-27 11:48:37 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-04-27 11:48:37 +0100 |
| commit | 9aa3a7b650e1147220dec7366c3696edd471ff8c (patch) | |
| tree | b4a055d13dc714fcade67871155938cc0122c7c4 /rts/Disassembler.c | |
| parent | 35e90394e9cd00fe1c38035af71eeac823963c0f (diff) | |
| download | haskell-9aa3a7b650e1147220dec7366c3696edd471ff8c.tar.gz | |
Fix build on OS X
Diffstat (limited to 'rts/Disassembler.c')
| -rw-r--r-- | rts/Disassembler.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Disassembler.c b/rts/Disassembler.c index 4bb53c64ed..033af11f64 100644 --- a/rts/Disassembler.c +++ b/rts/Disassembler.c @@ -75,7 +75,7 @@ disInstr ( StgBCO *bco, int pc ) instrs[pc], (signed int)instrs[pc+1]); pc += 2; break; case bci_CCALL: - debugBelch("CCALL marshaller at 0x%" FMT_HexSizeT "\n", + debugBelch("CCALL marshaller at 0x%" FMT_Word "\n", literals[instrs[pc]] ); pc += 1; break; case bci_STKCHECK: { @@ -130,7 +130,7 @@ disInstr ( StgBCO *bco, int pc ) case bci_PUSH_UBX: debugBelch("PUSH_UBX "); for (i = 0; i < instrs[pc+1]; i++) - debugBelch("0x%" FMT_HexSizeT " ", literals[i + instrs[pc]] ); + debugBelch("0x%" FMT_Word " ", literals[i + instrs[pc]] ); debugBelch("\n"); pc += 2; break; case bci_PUSH_APPLY_N: |