mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-11-05 08:16:16 +00:00
Code Issues 1 Releases Wiki Activity

Improve .ppasm function.

Browse Source
This commit is contained in:
Calvin Rose 2022-06-10 16:24:40 -05:00
parent c3648331f1
commit 6d188f6e44
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/boot/boot.janet
View File

@ -3417,7 +3417,8 @@
(def pc (frame :pc))
(def sourcemap (in dasm :sourcemap))
(var last-loc [-2 -2])
(print "\n signal: " (.signal))
(print "\n signal: " (.signal))
(print " status: " (fiber/status (.fiber)))
(print " function: " (dasm :name) " [" (in dasm :source "") "]")
(when-let [constants (dasm :constants)]
(printf " constants: %.4q" constants))