Compare commits

...

1 Commits

Author SHA1 Message Date
7c4ad64d58 fix: increase snippet timeout to 20s
All checks were successful
build / build (push) Successful in 5s
2026-03-05 09:49:04 -07:00

View File

@@ -144,9 +144,9 @@
(sp/view :value)])))
(defn- timeout-snippet-promises [snippet-promises fut]
;; Time out after eight seconds. With all the LaTeX and IPC, there
;; Time out after twenty seconds. With all the LaTeX and IPC, there
;; are so many opportunities for things to go wrong </3.
(let [fut-res (deref fut (* 10 1000) ::timed-out)]
(let [fut-res (deref fut (* 20 1000) ::timed-out)]
(if (= fut-res ::timed-out)
(do (future-cancel fut)
(doseq [[_snippet p] snippet-promises]