Permalink
Browse files

Print snapshot ID in pretty-print mode.

  • Loading branch information...
1 parent abacc9f commit c5c9ecb1fd60a82c70f31880a853a62b4f71a07b @nominolo committed Feb 5, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 rts/PrintIR.c
View
@@ -427,7 +427,7 @@ printPrettyIR_(FILE *out, Fragment *F, int fragment_id)
SnapEntry *se = &F->snapmap[snap->mapofs];
const BCIns *pc = F->startpc + (ptrdiff_t)(i4)se[snap->nent];
int fst = 1;
- fprintf(out, "| " COL_YELLOW "{");
+ fprintf(out, "| #%d " COL_YELLOW "{", s);
for (i = 0; i < F->snap[s].nent; i++, se++) {
IRRef r = snap_ref(*se);
if (!irref_islit(r)) {

0 comments on commit c5c9ecb

Please sign in to comment.