mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-12-02 21:09:55 +00:00
Code Issues 1 Releases Wiki Activity

Fix some indentation problems.

Browse Source
This commit is contained in:
Calvin Rose 2019-03-12 20:56:16 -04:00
parent 2a5234b390
commit 31e2415bbb
2 changed files with 63 additions and 62 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/core/core.janet
View File

@ -1637,7 +1637,8 @@ value, one key will be ignored."
(do (do
(def [fullpath mod-kind] (module/find path)) (def [fullpath mod-kind] (module/find path))
(unless fullpath (error mod-kind)) (unless fullpath (error mod-kind))
(def env (case mod-kind (def env
(case mod-kind
:source (do :source (do
# Normal janet module # Normal janet module
(def f (file/open fullpath)) (def f (file/open fullpath))
@ -1646,11 +1647,11 @@ value, one key will be ignored."
(defn chunks [buf _] (file/read f 2048 buf)) (defn chunks [buf _] (file/read f 2048 buf))
(defn bp [&opt x y] (defn bp [&opt x y]
(def ret (bad-parse x y)) (def ret (bad-parse x y))
(if exit-on-error (os/exit)) (if exit-on-error (os/exit 1))
ret) ret)
(defn bc [&opt x y z] (defn bc [&opt x y z]
(def ret (bad-compile x y z)) (def ret (bad-compile x y z))
(if exit-on-error (os/exit)) (if exit-on-error (os/exit 1))
ret) ret)
(run-context {:env newenv (run-context {:env newenv
:chunks chunks :chunks chunks