Joseph Ferano
57fe91f303
FIX.org, NEXT.md, DISCUSS.org, docs/DISCUSS.md and the session handoff at the root are one TODO.org now: 293 entries under seven subsystem headings, each carrying an org keyword that says where it stands. A DONE entry is a few lines saying what was decided and what that rules out; the reasoning that would not compress — the embedding spike and the four reports the hand-written x86 backend was built from — moved into docs/BUILT.md instead, and its entries point there in one line. Every entry was checked against the tree before it got a keyword, and the prose was wrong in both directions. Things the deleted files called open were built: the first-evaluation stall, main being redefinable, macro parameter lists, the type-limit constants, the array constructors, the byte fills, inc/dec, the discard's fontification, the Emacs buffers, rt_die's _exit, the backtrace surface, and the acceptance failure that could print and still exit zero. Things they called done were not: the backend reports' no-plan buckets had gone stale in the other direction, the value-dependent defvar was superseded rather than built, and macro-expansion source locations are on an unmerged lane, so that entry is NEXT and names the branch. Every comment that cited one of the five by name now cites a heading that exists, in TODO.org or in docs/BUILT.md. The session reports under docs/handoffs/ keep naming the files they worked on, because rewriting them would falsify what those sessions did; each carries a note saying where the content went.
27 lines
1.4 KiB
Plaintext
27 lines
1.4 KiB
Plaintext
;;;; A program that has not been told about the agent and is still running.
|
|
;;;;
|
|
;;;; dev-noagent.flan is the other half of this pair and stops short of it: its
|
|
;;;; main returns, so a moment later it is parked, and a redefinition sent to a
|
|
;;;; parked program is answered by the parking path. This one keeps running,
|
|
;;;; which is the state nothing had pinned: there is no agent in the process to
|
|
;;;; hand a module to and no socket to fall back on, so the daemon refuses the
|
|
;;;; delivery and says which socket it could not reach.
|
|
;;;;
|
|
;;;; That is the honest answer for it. The sentence [install_note] keeps for a
|
|
;;;; running program with no socket — queued, installs at its next
|
|
;;;; (agent/poll) — was true of a program that *links* the agent and has not
|
|
;;;; reached its (agent/start ...) yet, because there the ring is reachable
|
|
;;;; in-process while the socket is not yet bound. The package's constructor
|
|
;;;; binds before main now, so that window is gone; see TODO.org, "(agent/start) takes no argument, and binds before main".
|
|
;;;;
|
|
;;;; So: 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)
|