mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-01-14 09:25:41 +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

1
src/boot/boot.janet
View File

@ -3418,6 +3418,7 @@
(def sourcemap (in dasm :sourcemap)) (def sourcemap (in dasm :sourcemap))
(var last-loc [-2 -2]) (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 "") "]") (print " function: " (dasm :name) " [" (in dasm :source "") "]")
(when-let [constants (dasm :constants)] (when-let [constants (dasm :constants)]
(printf " constants: %.4q" constants)) (printf " constants: %.4q" constants))