use fennel 1.5's native debug tracking
This commit is contained in:
parent
cbce6a8cb8
commit
5e8b31ea47
@ -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
|
||||
|
||||
@ -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 []
|
||||
|
||||
@ -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)})
|
||||
|
||||
Loading…
Reference in New Issue
Block a user