;;;; A program that never imports the agent and is still running. flan dev
;;;; links the agent anyway, so a delivery is queued rather than refused; it
;;;; installs at a frame boundary the program never reaches, since nothing in
;;;; it calls (agent/poll).
;;;;
;;;; No (import agent ...) anywhere, and a loop that outlasts the test.
(defn step [] i64 7)

(defn main [] i32
  (print (step)) (println "")
  ;; Long enough that the session ends before the program does; short enough
  ;; that a daemon killed the hard way leaves nothing running for minutes.
  (dotimes [i 3000]
    (sleep-seconds 0.01))
  0)