fix: throw when temml output is not string

This commit is contained in:
2026-03-24 16:49:16 -06:00
parent 36e328915e
commit c74e36d8af

View File

@@ -55,7 +55,11 @@
(defn command-worker [x] (defn command-worker [x]
(cbor/encode cbor/default-codec (:in *worker*) x) (cbor/encode cbor/default-codec (:in *worker*) x)
(.flush (:in *worker*)) (.flush (:in *worker*))
(cbor/decode cbor/default-codec (:out *worker*))) (let [r (cbor/decode cbor/default-codec (:out *worker*))]
(if (string? r)
r
(throw (ex-info "bad data from temml worker"
{:data r})))))
(defn render-inline [s] (defn render-inline [s]
(command-worker s)) (command-worker s))