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

SCI: now with docstrings for core macros

Browse source
This commit is contained in:
Michiel Borkent 2022-10-30 15:12:23 +01:00
parent f5a226ab34
commit a035291f41
3 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 674897d4378049126bbd24ad4d537df9f619e9ea Subproject commit eb322b3b68312f4de109153ec1719042267320ac

4
src/babashka/impl/clojure/core.clj
View file

@ -7,7 +7,7 @@
[clojure.core :as c] [clojure.core :as c]
[clojure.string :as str] [clojure.string :as str]
[sci.core :as sci] [sci.core :as sci]
[sci.impl.namespaces :refer [copy-core-var core-var macrofy]] [sci.impl.namespaces :refer [copy-core-var new-var macrofy]]
[sci.impl.parser :as parser] [sci.impl.parser :as parser]
[sci.impl.utils :refer [clojure-core-ns]] [sci.impl.utils :refer [clojure-core-ns]]
[sci.impl.vars :as vars])) [sci.impl.vars :as vars]))
@ -166,7 +166,7 @@
'*data-readers* data-readers '*data-readers* data-readers
'default-data-readers (copy-core-var default-data-readers) 'default-data-readers (copy-core-var default-data-readers)
'xml-seq (copy-core-var xml-seq) 'xml-seq (copy-core-var xml-seq)
'read+string (core-var 'read+string (fn [& args] 'read+string (new-var 'read+string (fn [& args]
(apply read+string @common/ctx args))) (apply read+string @common/ctx args)))
'*command-line-args* command-line-args '*command-line-args* command-line-args
'*warn-on-reflection* warn-on-reflection '*warn-on-reflection* warn-on-reflection

2
src/babashka/main.clj
View file

@ -867,7 +867,7 @@ Use bb run --help to show this help output.
:namespaces (-> namespaces :namespaces (-> namespaces
(assoc 'clojure.core (assoc 'clojure.core
(assoc core-extras (assoc core-extras
'load-file (sci-namespaces/core-var 'load-file load-file*)))) 'load-file (sci-namespaces/new-var 'load-file load-file*))))
:env env :env env
:features #{:bb :clj} :features #{:bb :clj}
:classes @classes/class-map :classes @classes/class-map