Print ERC instructions as strings to avoid tripping up read-string on logs; previously (set! *default-data-reader-fn* tagged-literal) required to avoid exception
This commit is contained in:
parent
ad20e43516
commit
48658f455c
@ -60,7 +60,10 @@
|
|||||||
downsample? false}
|
downsample? false}
|
||||||
:as argmap}]
|
:as argmap}]
|
||||||
;;
|
;;
|
||||||
(prn {:starting-args (update (update argmap :error-function str) :instructions utils/not-lazy)})
|
(prn {:starting-args (update (update argmap :error-function str)
|
||||||
|
:instructions
|
||||||
|
(fn [instrs]
|
||||||
|
(utils/not-lazy (map #(if (fn? %) (str %) %) instrs))))})
|
||||||
(println)
|
(println)
|
||||||
;;
|
;;
|
||||||
(loop [generation 0
|
(loop [generation 0
|
||||||
|
Loading…
x
Reference in New Issue
Block a user