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:
Lee Spector 2023-11-21 22:56:04 -05:00
parent ad20e43516
commit 48658f455c

View File

@ -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