(import agent "vendor:agent")

(defstruct Missing [id i32])

(defn load [n i32] i32
  (restart-case
    (do (error (Missing {:id n}))
        0)
    (use-placeholder [] -1)
    (retry           [] 7)))

(defn main []
  (agent/start "/tmp/flan-breakdemo.sock")
  (print-i64 (i64 (load 1)))
  (newline))