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

Upgrade fennel to ~xerool/fennel for extra hooks

Browse Source
This commit is contained in:
XeroOl 2022-09-01 01:02:19 -05:00
parent 69fcd63fad
commit b9d084fada
No known key found for this signature in database
GPG Key ID: 9DD4B4B4DAED0322
3 changed files with 1104 additions and 1102 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1209
fennel
View File

File diff suppressed because it is too large Load Diff

977
src/fennel.lua
View File

File diff suppressed because it is too large Load Diff

20
test/completion-test.fnl
View File

@ -28,17 +28,17 @@
(. _G a)
(. _G b)
(. _G c))
"oops"))))
"oops")))
;; (it "suggests locals in scope"
;; (local state (doto [] setup-server))
;; (open-file state filename "(local x 10)\n(print )")
;; (let [response (dispatch.handle* state (completion-at filename 1 7))]
;; (var seen-suggestion false)
;; (each [_ suggestion (ipairs (. response 1 :result))]
;; (if (= suggestion.label :x)
;; (set seen-suggestion true)))
;; (assert seen-suggestion "x was not suggested"))))
(it "suggests locals in scope"
(local state (doto [] setup-server))
(open-file state filename "(local x 10)\n(print )")
(let [response (dispatch.handle* state (completion-at filename 1 7))]
(var seen-suggestion false)
(each [_ suggestion (ipairs (. response 1 :result))]
(if (= suggestion.label :x)
(set seen-suggestion true)))
(assert seen-suggestion "x was not suggested"))))
;; (it "treats things in a call position differently")
;; (it "does not suggest locals out of scope")