diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/dump.lua | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/lib/dump.lua b/lib/dump.lua index 4e794498..3a94b935 100644 --- a/lib/dump.lua +++ b/lib/dump.lua | |||
| @@ -418,16 +418,12 @@ local function dump_ir(tr, dumpsnap, dumpreg) | |||
| 418 | band(ot, 64) == 0 and " " or "+", | 418 | band(ot, 64) == 0 and " " or "+", |
| 419 | irtype[t], op)) | 419 | irtype[t], op)) |
| 420 | local m1 = band(m, 3) | 420 | local m1 = band(m, 3) |
| 421 | local op4 = sub(op, 1, 4) | 421 | if sub(op, 1, 4) == "CALL" then |
| 422 | if op4 == "CALL" then | ||
| 423 | out:write(format("%-10s (", vmdef.ircall[op2])) | 422 | out:write(format("%-10s (", vmdef.ircall[op2])) |
| 424 | if op1 ~= -1 then dumpcallargs(tr, op1) end | 423 | if op1 ~= -1 then dumpcallargs(tr, op1) end |
| 425 | out:write(")") | 424 | out:write(")") |
| 426 | elseif op4 == "CNEW" then | 425 | elseif op == "CNEW " and op2 == -1 then |
| 427 | out:write(formatk(tr, op2)) | 426 | out:write(formatk(tr, op1)) |
| 428 | if op1 ~= -1 then | ||
| 429 | out:write(" ("); dumpcallargs(tr, op1); out:write(")") | ||
| 430 | end | ||
| 431 | elseif m1 ~= 3 then -- op1 != IRMnone | 427 | elseif m1 ~= 3 then -- op1 != IRMnone |
| 432 | if op1 < 0 then | 428 | if op1 < 0 then |
| 433 | out:write(formatk(tr, op1)) | 429 | out:write(formatk(tr, op1)) |