1 files changed, 12 insertions, 6 deletions
diff --git a/lib/dump.lua b/lib/dump.lua
index c12b0ba8..ccd43d72 100644
--- a/lib/dump.lua
+++ b/lib/dump.lua
@@ -483,15 +483,21 @@ local function dump_record(tr, func, pc, depth, callee)
    recdepth = depth
    recprefix = rep(" .", depth)
  end
-  local line = bcline(func, pc, recprefix)
+  local line
-  if dumpmode.H then line = gsub(line, "[<>&]", html_escape) end
+  if pc >= 0 then
-  if type(callee) == "function" then
+    line = bcline(func, pc, recprefix)
-    out:write(sub(line, 1, -2), "  ; ", fmtfunc(callee), "\n")
+    if dumpmode.H then line = gsub(line, "[<>&]", html_escape) end
+  else
+    line = "0000 "..recprefix.." FUNCC      \n"
+    callee = func
+  end
+  if pc <= 0 then
+    out:write(sub(line, 1, -2), "         ; ", fmtfunc(func), "\n")
  else
    out:write(line)
  end
-  if band(funcbc(func, pc), 0xff) < 16 then -- Write JMP for cond. ORDER BC
+  if pc >= 0 and band(funcbc(func, pc), 0xff) < 16 then -- ORDER BC
-    out:write(bcline(func, pc+1, recprefix))
+    out:write(bcline(func, pc+1, recprefix)) -- Write JMP for cond.
  end
 end