E-5 marked waits: a wait on a marked event runs only on the operator's warrant for that one wait

mesh_wait goes through the runner's approval gate (node-tools/internal/approval, Gate.Waited): a wait whose
subjects overlap a marked subject of any module the catalog half lists (the newest entry of every followed
branch, with the served entry of each module this runner serves) is an act of the runner's own module and
build (MESH_FINGERPRINT at its start), asked once on operator-channel as "Wait on <names> on <node>?", and
held, subscribing nothing but its ask's decided, until its timeout, its caller's going or the choice. On a
warrant it subscribes, its timeout running from then, and answers {answer, approval}. Before the marks are
read nothing is asked; a wait from a seat is never marked. The state fixture moves to meshtest so the
console's table can hold a gate.

Builds: design 34 every-event §34, §35, §36, §37; design 47 G lead answer A-168

Claude-Session: https://claude.ai/code/session_01NcbgfGKaxw984XyAPfLm4h

node-tools/internal/approval/marks.go

@@ -29,6 +29,9 @@ type Catalog interface {
 	Newest(module string) (catalogseat.CatalogEntry, bool)
 	// Definitions are the seat definitions the catalog half carries, by seat.
 	Definitions() map[string]seatdef.Definition
+	// Entries are the newest entry of every module in every followed branch's half, a marked wait's marks (lead answer
+	// A-168).
+	Entries() []catalogseat.CatalogEntry
 }
 
 // Marks is what one module's calls are gated by: its marked tools and seat verbs, and the subjects of its marked events and
@@ -89,61 +92,67 @@ func Derive(c Catalog, module, fingerprint string) Marks {
 		entries = append(entries, e)
 	}
 	for _, e := range entries {
-		source := "entry " + e.Module + " " + orNone(e.Fp)
-		var said marked
-		if raw, err := json.Marshal(e.Manifest); err == nil {
-			_ = json.Unmarshal(raw, &said)
-		}
-		serves := map[string]bool{}
-		for _, sv := range e.Serves {
-			serves[sv] = true
-			seat, verb, _ := strings.Cut(sv, ".")
-			for _, v := range defs[seat].Verbs {
-				if v.Name == verb && v.NeedsApproval {
-					m.Verbs[sv] = "seat " + seat
-				}
+		m.add(e, defs)
+	}
+	return m
+}
+
+// add takes one entry's marks into m: its `needs-approval` (a tool, a verb it serves or an event it declares), the seat
+// definitions' marks of every verb it serves, and every stream it declares with a `grant`, each with its source.
+func (m *Marks) add(e catalogseat.CatalogEntry, defs map[string]seatdef.Definition) {
+	source := "entry " + e.Module + " " + orNone(e.Fp)
+	var said marked
+	if raw, err := json.Marshal(e.Manifest); err == nil {
+		_ = json.Unmarshal(raw, &said)
+	}
+	serves := map[string]bool{}
+	for _, sv := range e.Serves {
+		serves[sv] = true
+		seat, verb, _ := strings.Cut(sv, ".")
+		for _, v := range defs[seat].Verbs {
+			if v.Name == verb && v.NeedsApproval {
+				m.Verbs[sv] = "seat " + seat
 			}
 		}
-		events := map[string]bool{}
-		for _, ev := range said.Emits {
+	}
+	events := map[string]bool{}
+	for _, ev := range said.Emits {
+		events[ev] = true
+	}
+	for _, s := range said.Streams {
+		for _, ev := range s.Events {
 			events[ev] = true
 		}
-		for _, s := range said.Streams {
-			for _, ev := range s.Events {
-				events[ev] = true
+	}
+	for _, name := range said.NeedsApproval {
+		switch {
+		case serves[name]:
+			if _, bySeat := m.Verbs[name]; !bySeat {
+				m.Verbs[name] = source
+			}
+		case events[name]:
+			for _, s := range eventSubjects(e.Module, name) {
+				m.Subjects[s] = source
 			}
+		default:
+			m.Tools[name] = source
+		}
+	}
+	for _, s := range said.Streams {
+		if len(s.Grant) == 0 || string(s.Grant) == "null" {
+			continue
 		}
-		for _, name := range said.NeedsApproval {
-			switch {
-			case serves[name]:
-				if _, bySeat := m.Verbs[name]; !bySeat {
-					m.Verbs[name] = source
-				}
-			case events[name]:
-				for _, s := range eventSubjects(e.Module, name) {
-					m.Subjects[s] = source
-				}
-			default:
-				m.Tools[name] = source
-			}
+		wire := make([]string, 0, len(s.Events))
+		for _, ev := range s.Events {
+			wire = append(wire, buscompose.WirePattern(ev))
 		}
-		for _, s := range said.Streams {
-			if len(s.Grant) == 0 || string(s.Grant) == "null" {
-				continue
-			}
-			wire := make([]string, 0, len(s.Events))
-			for _, ev := range s.Events {
-				wire = append(wire, buscompose.WirePattern(ev))
-			}
-			for _, sub := range (buscompose.ModuleStream{Module: e.Module, Events: wire}).Subjects() {
-				m.Subjects[sub] = source
-				if !strings.HasSuffix(sub, ">") {
-					m.Subjects[sub+".>"] = source
-				}
+		for _, sub := range (buscompose.ModuleStream{Module: e.Module, Events: wire}).Subjects() {
+			m.Subjects[sub] = source
+			if !strings.HasSuffix(sub, ">") {
+				m.Subjects[sub+".>"] = source
 			}
 		}
 	}
-	return m
 }
 
 // eventSubjects are a marked event's subjects on the bus (design 34 every-event §33): said on the module's events and on its