1
0
mirror of https://github.com/janet-lang/janet synced 2024-06-24 06:03:17 +00:00

Remove redundant do

This commit is contained in:
Josef Pospíšil 2021-01-07 14:38:58 +01:00
parent 4e7ad3c7ce
commit 5a2a134c95

View File

@ -3222,10 +3222,9 @@
(use-2 evaluator (tuple/slice source 1))
# Import-like form
(importers head)
(do
(let [[l c] (tuple/sourcemap source)
newtup (tuple/setmap (tuple ;source :evaluator evaluator) l c)]
((compile newtup env where)))))))
(let [[l c] (tuple/sourcemap source)
newtup (tuple/setmap (tuple ;source :evaluator evaluator) l c)]
((compile newtup env where))))))
(defn flycheck
``Check a file for errors without running the file. Found errors will be printed to stderr