;;;; A run-time-new global with a value of its own, which is the half of the
;;;; new-name path that a zeroed defvar cannot measure: [flan_dev_global]
;;;; allocates with calloc, so a global declared zero looks right whether or
;;;; not its initial value travelled with the module. [tuning] is 42, and the
;;;; transcript is the number the host prints, so an image that never arrived
;;;; prints 4 rather than 88.
(defvar counter i64)
(defvar tuning i64 42)

(defn helper [x i64] i64 (* x 2))

(defn bump [] i64
  (println "v6")
  (set counter (+ counter tuning 1))
  (helper counter))

(defn outer [] i64 (bump))