Bind current-ns to user

This commit is contained in:
Michiel Borkent 2020-01-12 11:51:40 +01:00
parent d815c35f71
commit 7b85863020
2 changed files with 3 additions and 2 deletions

2
sci

@ -1 +1 @@
Subproject commit 172749f8117ad4c2c76332f9685a20707fc9daaf
Subproject commit 50a09c277da48b58282489bcab41109a27091b43

View file

@ -347,7 +347,8 @@ Everything after that is bound to *command-line-args*."))
nil))
exit-code
(or exit-code
(sci/with-bindings {reflection-var false}
(sci/with-bindings {reflection-var false
vars/current-ns (vars/create-sci-ns ctx 'user)}
(or
#_(binding [*out* *err*]
(prn ">>" _opts))