luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

sci: support metadata on namespaces

Browse source
This commit is contained in:
Michiel Borkent 2020-02-18 16:25:04 +01:00 committed by GitHub
parent 29c0f20ead
commit 41b3893056
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
4 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
sci

@ -1 +1 @@
Subproject commit 57209f08d18ee168dbc1dca26e60b4958add3c0c
Subproject commit 9c3c6e492e100b1b438b9e073f574fc52622c818

2
src/babashka/impl/clojure/core/server.clj
View file

@ -46,7 +46,7 @@
(sci/with-bindings {sci/in in
sci/out out
sci/err err
vars/current-ns (vars/->SciNamespace 'user)}
vars/current-ns (vars/->SciNamespace 'user nil)}
(swap! server assoc-in [:sessions client-id] {})
(apply accept args))
(catch SocketException _disconnect)

2
src/babashka/main.clj
View file

@ -283,7 +283,7 @@ Everything after that is bound to *command-line-args*."))
(prn "M" (meta (get bindings 'future))))
(binding [*unrestricted* true]
(sci/binding [reflection-var false
vars/current-ns (vars/->SciNamespace 'user)]
vars/current-ns (vars/->SciNamespace 'user nil)]
(let [t0 (System/currentTimeMillis)
{:keys [:version :shell-in :edn-in :shell-out :edn-out
:help? :file :command-line-args

2
test/babashka/impl/repl_test.clj
View file

@ -14,7 +14,7 @@
(vars/bindRoot sci/err *err*)
(defn repl! []
(sci/with-bindings {vars/current-ns (vars/->SciNamespace 'user)}
(sci/with-bindings {vars/current-ns (vars/->SciNamespace 'user nil)}
(start-repl! (init {:bindings {'*command-line-args*
["a" "b" "c"]}
:env (atom {})}))))