mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-06-24 06:03:17 +00:00
Code Issues 1 Releases Wiki Activity

Clean up env dance

Browse Source
This commit is contained in:
Andrew Owen 2021-01-16 12:47:50 -07:00
parent 7f74ff3dd7
commit c6aa536590
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/boot/boot.janet
View File

@ -3378,10 +3378,8 @@
(file/read stdin :line buf))
(def env (make-env))
(when-let [profile.janet (dyn :profilepath)]
(def src (env :source))
(def new-env (dofile profile.janet :exit true :source "profile.janet"))
(merge-module env new-env "" false)
(put env :source src))
(def new-env (dofile profile.janet :exit true))
(merge-module env new-env "" false))
(if *debug* (put env :debug true))
(def getter (if *raw-stdin* getstdin getline))
(defn getchunk [buf p]