use fennel 1.5's native debug tracking

This commit is contained in:
XeroOl 2024-09-03 12:17:53 -05:00
parent cbce6a8cb8
commit 5e8b31ea47
3 changed files with 9 additions and 1 deletions

View File

@ -389,7 +389,7 @@ identifiers are declared / referenced in which places."
(parsed ast lexical)
;; This is bad; we mutate fennel.macro-path
;; This is bad; we have to mutate fennel.macro-path to use fennel's native macro loader
(let [old-macro-path fennel.macro-path]
(when ?root-uri
(set fennel.macro-path

View File

@ -151,6 +151,11 @@ except that it sets a new message handler `msgh`.")
`(,a ,b ,c))
(fo|o print :hello :world)"
"```fnl\n(foo a b c)\n```\ndocstring!")
; (check {:main.fnl "(import-macros cool :cool)
; (coo|l.=)"
; :cool.fnl ";; fennel-ls: macro-file
; {:= (λ [...] ...)}"}
; "```fnl\n{:= (λ [...] ...)}\n```")
nil)
(fn test-reader []

View File

@ -1,6 +1,9 @@
(local faith (require :faith))
(local fennel (require :fennel))
(set debug.getinfo (or fennel.getinfo debug.getinfo))
(set debug.traceback (or fennel.traceback debug.traceback))
(case (os.getenv "FAITH_TEST")
target (let [(module function) (target:match "([^ ]+) ([^ ]+)")]
(tset package.loaded module {function (. (require module) function)})