1
0
mirror of https://github.com/janet-lang/janet synced 2025-10-06 11:32:29 +00:00

Merge branch 'master' into net

This commit is contained in:
Calvin Rose
2020-04-17 15:08:26 -05:00
51 changed files with 2088 additions and 574 deletions

View File

@@ -1,20 +1,18 @@
###
### A useful debugger library for Janet. Should be used
### inside a debug repl.
### inside a debug repl. This has been moved into the core.
###
(defn .fiber
"Get the current fiber being debugged."
[]
(if-let [entry (dyn '_fiber)]
(entry :value)
(dyn :fiber)))
(dyn :fiber))
(defn .stack
"Print the current fiber stack"
[]
(print)
(debug/stacktrace (.fiber) "")
(with-dyns [:err-color false] (debug/stacktrace (.fiber) ""))
(print))
(defn .frame