bigmerge
373265c05d
- primitive_seam.el: SWARM_PRIMITIVE_SEAM selects stub (default, hermetic) vs decorated (reshape's dharma-bus primitives). Every seam call is an afferent signal; telemetry (seam_mode + afferent tick) rides the vertical result path. - primitive_binding.el: THE ONE FLIP POINT — bound_think/attend/learn today fall back to the stub; when the reshape's decorated primitives land, flip one line each and set SWARM_PRIMITIVE_SEAM=decorated. No other change anywhere. - swarm.el: default blueprint routes think through the seam; the @manager aggregates afferent counters from worker results (containment-safe, no shared bus register) and journals a swarm.telemetry record; telemetry in the return. - harness_local_swarm.el: 17/17 GREEN on :8901 with the stub — 8 native-thread workers at concurrency 4, reduce+vote convergence, CCR scoping+non-leak, all three containment rules (incl. live Rule-2 denial), durable work-tracking, afferent telemetry observed. Runs identically under seam=decorated today (binding fallback), proving the flip path executes. Engram writes stay opt-in (durable journal is the substrate); daemon healthy.
56 lines
2.2 KiB
EmacsLisp
56 lines
2.2 KiB
EmacsLisp
// primitive_seam.el — the configurable primitive seam + telemetry.
|
|
//
|
|
// One switch selects where a worker's primitive invocation goes:
|
|
// SWARM_PRIMITIVE_SEAM=stub (default) — hermetic in-process think.
|
|
// SWARM_PRIMITIVE_SEAM=decorated — the reshape's decorated
|
|
// primitives on the dharma bus
|
|
// (see primitive_binding.el).
|
|
//
|
|
// Every seam invocation is an AFFERENT signal — a primitive call travelling
|
|
// toward the manager. The seam stamps telemetry onto each thought (seam_mode +
|
|
// one afferent tick) so the coordinator can aggregate afferent counters across
|
|
// the swarm without any shared mutable state (containment-safe: counts ride the
|
|
// vertical result path, not a shared bus register).
|
|
|
|
// seam_mode — "stub" (default) or "decorated".
|
|
fn seam_mode() -> String {
|
|
let m: String = env("SWARM_PRIMITIVE_SEAM")
|
|
if str_eq(m, "decorated") {
|
|
return "decorated"
|
|
}
|
|
return "stub"
|
|
}
|
|
|
|
// seam_think — route a worker's `think` through the configured seam and stamp
|
|
// telemetry. Returns the thought JSON augmented with:
|
|
// seam_mode : which side of the seam served this call
|
|
// afferent : "1" — one afferent primitive signal was emitted
|
|
fn seam_think(ctx: String, instruction: String) -> String {
|
|
let mode: String = seam_mode()
|
|
let thought: String = ""
|
|
if str_eq(mode, "decorated") {
|
|
let thought = bound_think(ctx, instruction)
|
|
} else {
|
|
let thought = primitive_think(ctx, instruction)
|
|
}
|
|
let t1: String = json_set_str(thought, "seam_mode", mode)
|
|
let t2: String = json_set_str(t1, "afferent", "1")
|
|
return t2
|
|
}
|
|
|
|
// seam_attend / seam_learn — same seam for the other primitives (used when a
|
|
// blueprint retrieves or writes through the bus).
|
|
fn seam_attend(query: String, limit: Int) -> String {
|
|
if str_eq(seam_mode(), "decorated") {
|
|
return bound_attend(query, limit)
|
|
}
|
|
return primitive_attend(query, limit)
|
|
}
|
|
|
|
fn seam_learn(corr_id: String, observation: String) -> String {
|
|
if str_eq(seam_mode(), "decorated") {
|
|
return bound_learn(corr_id, observation)
|
|
}
|
|
return primitive_learn(corr_id, observation)
|
|
}
|