From c74e36d8af3e0b61e53f8caffb04486aadc35369 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Madeleine=20Sydney=20=C5=9Alaga?= Date: Tue, 24 Mar 2026 16:49:16 -0600 Subject: [PATCH 1/2] fix: throw when temml output is not string --- doerg/src/net/deertopia/doerg/tex/temml.clj | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/doerg/src/net/deertopia/doerg/tex/temml.clj b/doerg/src/net/deertopia/doerg/tex/temml.clj index 22082fb..814635a 100644 --- a/doerg/src/net/deertopia/doerg/tex/temml.clj +++ b/doerg/src/net/deertopia/doerg/tex/temml.clj @@ -55,7 +55,11 @@ (defn command-worker [x] (cbor/encode cbor/default-codec (:in *worker*) x) (.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] (command-worker s)) -- 2.53.0 From e02b77e1e45efe58da8305e09ca9c7751b399bea Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Madeleine=20Sydney=20=C5=9Alaga?= Date: Tue, 24 Mar 2026 16:10:50 -0600 Subject: [PATCH 2/2] fix: temml prelude --- doerg/src/net/deertopia/doerg/tex/temml.clj | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/doerg/src/net/deertopia/doerg/tex/temml.clj b/doerg/src/net/deertopia/doerg/tex/temml.clj index 814635a..fed2aff 100644 --- a/doerg/src/net/deertopia/doerg/tex/temml.clj +++ b/doerg/src/net/deertopia/doerg/tex/temml.clj @@ -17,13 +17,17 @@ (def ^:dynamic *worker*) -(def ^:private prelude-file - (fs/create-temp-file {:prefix "doerg-prelude-" - :suffix ".tex"})) +;; 외부의 브로그램이 JVM resource를 사용 위해서 파일 시스템에서 써야 +;; 합니다. +(defonce ^:private prelude-file + (-> (fs/create-temp-file {:prefix "doerg-prelude-" + :suffix ".tex"}) + fs/file)) (defn worker [] (let [doerg-temml-worker (-> cfg/*cfg* ::doerg/doerg-temml-worker)] - (when-not (fs/exists? prelude-file) + (when (or (not (fs/exists? prelude-file)) + (zero? (fs/size prelude-file))) (-> "net/deertopia/doerg/prelude.tex" io/resource io/input-stream -- 2.53.0