fey.naomi/fennel-ls
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Ignore the pick-values syms (in preparation for fennel 1.5.0)

Browse Source
This commit is contained in:
XeroOl 2024-06-14 22:24:52 -05:00
parent e165aa1402
commit 5cef13c12d
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/fennel-ls/compiler.fnl
View File

@ -148,12 +148,13 @@ identifiers are declared / referenced in which places."
(if (. references symbol) (if (. references symbol)
(tset (. references symbol :target) :var-set true)))))) (tset (. references symbol :target) :var-set true))))))
(λ destructure [to from scope {:declaration ?declaration? :symtype _ &as opts}] (λ destructure [to from scope {:declaration ?declaration? : symtype &as opts}]
;; I really don't understand symtype ;; I really don't understand symtype
;; I think I need an explanation ;; I think I need an explanation
(when (not= symtype :pv)
(if ?declaration? (if ?declaration?
(define to from scope opts) (define to from scope opts)
(mutate to from scope))) (mutate to from scope))))
(λ add-field [ast multisym scope] (λ add-field [ast multisym scope]
"the multisym has the main name and the root name" "the multisym has the main name and the root name"