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

[babashka/process#2] *escape-fn*

Browse source
This commit is contained in:
Michiel Borkent 2020-10-19 23:46:21 +02:00
parent d045f774ea
commit 8c73a02915
2 changed files with 17 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
process

@ -1 +1 @@
Subproject commit 148ecb18fdba9cf8e158bec213c96d1ac197b6a4 Subproject commit d7eb4f67b29916e98df0e303f5f0dc38a4769a9f

21
src/babashka/impl/process.clj
View file

@ -5,9 +5,20 @@
(def tns (sci/create-ns 'babashka.process nil)) (def tns (sci/create-ns 'babashka.process nil))
(def escape-fn (sci/copy-var process/*escape-fn* tns))
(defn process [& args]
(binding [process/*escape-fn* @escape-fn]
(apply process/process args)))
(defn pb [& args]
(binding [process/*escape-fn* @escape-fn]
(apply process/pb args)))
(def process-namespace (def process-namespace
{'process (copy-var process/process tns) {'process (copy-var process tns)
'check (copy-var process/check tns) 'check (copy-var process/check tns)
'pb (copy-var process/pb tns) 'pb (copy-var pb tns)
'pipeline (copy-var process/pipeline tns) 'pipeline (copy-var process/pipeline tns)
'$ (copy-var process/$ tns)}) '$ (copy-var process/$ tns)
'*escape-fn* escape-fn})