summaryrefslogtreecommitdiff
path: root/rts/Disassembler.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/Disassembler.c')
-rw-r--r--rts/Disassembler.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/rts/Disassembler.c b/rts/Disassembler.c
index 2e1790ef8d..f9e42b7767 100644
--- a/rts/Disassembler.c
+++ b/rts/Disassembler.c
@@ -281,11 +281,11 @@ disInstr ( StgBCO *bco, int pc )
*/
void disassemble( StgBCO *bco )
{
- nat i, j;
- StgWord16* instrs = (StgWord16*)(bco->instrs->payload);
- StgMutArrPtrs* ptrs = bco->ptrs;
- nat nbcs = (int)(bco->instrs->bytes / sizeof(StgWord16));
- nat pc = 1;
+ uint32_t i, j;
+ StgWord16* instrs = (StgWord16*)(bco->instrs->payload);
+ StgMutArrPtrs* ptrs = bco->ptrs;
+ uint32_t nbcs = (uint32_t)(bco->instrs->bytes / sizeof(StgWord16));
+ uint32_t pc = 1;
debugBelch("BCO\n" );
pc = 0;