From 48658f455c7a8ece095dbd90e2792c4f7b26ad41 Mon Sep 17 00:00:00 2001 From: Lee Spector Date: Tue, 21 Nov 2023 22:56:04 -0500 Subject: [PATCH] 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 --- src/propeller/gp.cljc | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/propeller/gp.cljc b/src/propeller/gp.cljc index 3fd72ed..9ceac05 100644 --- a/src/propeller/gp.cljc +++ b/src/propeller/gp.cljc @@ -60,7 +60,10 @@ downsample? false} :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) ;; (loop [generation 0