Mercurial > hg > index.cgi
comparison lwasm/debug.c @ 110:38c1537857ce
Pragma stack at parse stage now works
author | lost@l-w.ca |
---|---|
date | Sun, 07 Aug 2011 10:37:22 -0600 |
parents | 7317fbe024af |
children | 697bc543368c |
comparison
equal
deleted
inserted
replaced
109:6a919c3ca0e9 | 110:38c1537857ce |
---|---|
42 | 42 |
43 debug_message(as, 100, "Lines:"); | 43 debug_message(as, 100, "Lines:"); |
44 | 44 |
45 for (cl = as -> line_head; cl; cl = cl -> next) | 45 for (cl = as -> line_head; cl; cl = cl -> next) |
46 { | 46 { |
47 debug_message(as, 100, "%p INSN %d (%s) LEN %d", cl, cl -> insn, (cl -> insn >= 0) ? instab[cl -> insn].opcode : "<none>", cl -> len); | 47 debug_message(as, 100, "%p INSN %d (%s) LEN %d PRAGMA %x", cl, cl -> insn, (cl -> insn >= 0) ? instab[cl -> insn].opcode : "<none>", cl -> len, cl -> pragmas); |
48 debug_message(as, 100, " ADDR: %s", lw_expr_print(cl -> addr)); | 48 debug_message(as, 100, " ADDR: %s", lw_expr_print(cl -> addr)); |
49 debug_message(as, 100, " PB: %02X; LINT: %X; LINT2: %X", cl -> pb, cl -> lint, cl -> lint2); | 49 debug_message(as, 100, " PB: %02X; LINT: %X; LINT2: %X", cl -> pb, cl -> lint, cl -> lint2); |
50 for (le = cl -> exprs; le; le = le -> next) | 50 for (le = cl -> exprs; le; le = le -> next) |
51 { | 51 { |
52 debug_message(as, 100, " EXPR %d: %s", le -> id, lw_expr_print(le -> expr)); | 52 debug_message(as, 100, " EXPR %d: %s", le -> id, lw_expr_print(le -> expr)); |