brink-runtime 0.0.15

//! `save_state` / `load_state`: produce and reconcile the durable,
//! name-keyed [`SaveState`] game-state save.
//!
//! [`SaveState`] (defined in `brink-format`) is distinct from the in-memory
//! [`StorySnapshot`](crate::StorySnapshot), which captures full execution
//! position and is locked to one exact program build. `SaveState` captures
//! only *game state* — globals, visit/turn counts, turn index, RNG — keyed by
//! stable identities (variable name; scope `DefinitionId`), so a save survives
//! a story recompile/patch as long as the relevant names/paths are unchanged.
//! Execution position is deliberately not captured; the host re-enters a
//! conversation at a known knot. See `docs/external-binding-foundation.md`.
//!
//! **F6.1b:** the logic lives as free functions over `&Program` +
//! `&impl ContextAccess`, not as `Story` methods, so any holder of a flow's
//! context — `Story`'s own `default_context`, or a `bevy-brink` `ContextView`
//! over a shared `World` plus an entity's `FlowLocal` — can save/load without
//! going through `Story` at all. [`Story::save_state`]/[`Story::load_state`]
//! now delegate to these, unchanged in observable behavior.
//!
//! **Enumeration.** `ContextAccess` has no iteration surface (a `ContextView`
//! can't hand back "every visited id" — it only answers point queries routed
//! by scope), so the candidate id set for visits/turns comes from the
//! `Program`'s own container definitions rather than map iteration. Every
//! container the VM ever visit/turn-counts carries `CountingFlags::VISITS`:
//! `vm.rs`'s `EnterContainer`/goto paths only ever call
//! `increment_visit`/`set_turn_count` when that flag is set on the target
//! container. (The converter *does* set `CountingFlags::TURNS` independently,
//! mirroring inklecate's container flags — but since every VM counting site
//! gates on `VISITS` alone, a TURNS-only container can never accrue a runtime
//! entry.) So containers with `VISITS` set are exactly the superset of ids
//! that could have a visit *or* turn entry. Iterating `Program::containers` (a `Vec`,
//! not a hash map) keeps enumeration order deterministic independent of
//! `Program`'s internal id tables.
//!
//! For each candidate id: `ContextAccess::visit_count` returns `0` for an id
//! the context has never visited (`World::increment_visit` only ever inserts
//! on the first increment, `or_insert(0) += 1`), so a `0` here means "never
//! visited" and is skipped — that reproduces the old code's
//! present-entries-only output, which iterated `World`'s
//! `visit_counts: HashMap` directly and so only ever saw ids that had
//! actually been inserted. `turn_count` returns `Option<u32>`, so absence is
//! directly distinguishable from an explicit `0` without a sentinel value.
//! Output is sorted by id explicitly (`Vec::sort_by_key`) rather than relying
//! on `Program::containers`' container-index order — byte-identical save
//! output is a hard requirement independent of container layout.

use alloc::borrow::ToOwned;
use alloc::collections::BTreeMap;
use alloc::format;
use alloc::string::String;
use alloc::sync::Arc;
use alloc::vec::Vec;

use brink_format::{
    ClosureEnvEntry, ClosureValue, CountingFlags, DefinitionId, ListValue, LoadReport, OrderedMap,
    SAVE_FORMAT_VERSION, SaveState, Value, VisitEntry,
};

use crate::StoryRng;
use crate::debug::NameResolver;
use crate::program::Program;
use crate::state::ContextAccess;
use crate::story::Story;

/// Capture a flow's game state as a durable, name-keyed [`SaveState`]. Does
/// not capture execution position — see the module docs.
///
/// `ctx` can be any [`ContextAccess`] implementor: `World` directly, a
/// `ContextView` routing over `(World, FlowLocal)` (in which case every value
/// captured is the **effective** value for that flow — a `Local` override
/// where present, else `World`'s value on a read-through miss), or an
/// `ObservedContext` wrapping either.
#[must_use]
pub fn save_state<C: ContextAccess + ?Sized>(program: &Program, ctx: &C) -> SaveState {
    let resolver = NameResolver::new(program);

    let globals: BTreeMap<String, Value> = (0..program.global_count())
        .filter_map(|idx| {
            program.global_slot_name(idx as usize).map(|name| {
                let value = ctx.global(idx).clone();
                // Same mechanism as `Opcode::GetGlobal`'s read (a bare
                // `Arc::clone` on a collection-typed `Value`) — reported
                // through the same counter so a save/load cycle's
                // Arc-clone count is visible to `bench-counters`
                // (issue #821 Workstream C), not silently invisible just
                // because it's a host-side `ContextAccess` read rather
                // than a VM opcode.
                crate::vm::note_value_share(&value);
                (name.to_owned(), value)
            })
        })
        .collect();

    // M-3 (docs/modules-spec.md §5): each global's compiled `DefinitionId`
    // at save time, so a later miss-path lookup (a renamed VAR/CONST/LIST —
    // declared-module identity is `(module, name)`-hashed, so the bare name
    // alone doesn't recover it) can consult the alias table directly. See
    // `load_state`'s doc comment.
    let global_ids: BTreeMap<String, DefinitionId> = (0..program.global_count())
        .filter_map(|idx| {
            let name = program.global_slot_name(idx as usize)?;
            let id = program.global_id(idx as usize)?;
            Some((name.to_owned(), id))
        })
        .collect();

    let mut visits = Vec::new();
    let mut turns = Vec::new();
    for container in &program.containers {
        if !container.counting_flags.contains(CountingFlags::VISITS) {
            continue;
        }
        let id = container.id;

        let count = ctx.visit_count(id);
        if count > 0 {
            visits.push(VisitEntry {
                id,
                path: resolver.def_path(id).map(str::to_owned),
                count,
            });
        }

        if let Some(turn) = ctx.turn_count(id) {
            turns.push(VisitEntry {
                id,
                path: resolver.def_path(id).map(str::to_owned),
                count: turn,
            });
        }
    }
    visits.sort_by_key(|e| e.id.to_raw());
    turns.sort_by_key(|e| e.id.to_raw());

    SaveState {
        version: SAVE_FORMAT_VERSION,
        globals,
        global_ids,
        visits,
        turns,
        turn_index: ctx.turn_index(),
        rng_seed: ctx.rng_seed(),
        previous_random: ctx.previous_random(),
        // FS-1 is format-only (`docs/flow-suspension-spec.md` §9): the
        // runtime spill/restore that would populate a live suspended flow
        // here is FS-3 scope. Always `None` until then.
        suspended: None,
    }
}

/// Reconcile a [`SaveState`] into a flow's context, returning a
/// [`LoadReport`] of anything that couldn't be applied. Globals are matched
/// by name; visit/turn counts by id. Tolerant of story patches: unknown
/// globals are reported, scopes the program no longer has retain their saved
/// counts harmlessly in the live context. Note one deliberate change from the
/// pre-F6.1b `Story` methods: such stale entries are **not re-emitted by a
/// subsequent [`save_state`]** (which enumerates the *current* program's
/// containers, not the live maps) — ghost counts from older program versions
/// no longer round-trip through saves indefinitely.
///
/// **M-3 rehydration miss-path lookup** (`docs/modules-spec.md` §5): a
/// visit/turn-count id, or a divert-target/fn-token/closure-target id
/// embedded inside a saved global's value, that the current program doesn't
/// recognize is looked up in the compiled `#@was` alias table before being
/// treated as genuinely gone — a knot/stitch/module rename that recorded
/// `#@was` rebinds saved state deterministically instead of orphaning it
/// under the stale id. Still unresolved after that (only checked, and only
/// reported, for a program that carries alias-table entries at all — an
/// ordinary content edit with no `#@was` stays exactly as silent as before
/// M-3) surfaces a teaching message in [`LoadReport::unresolved_renames`].
///
/// A saved global whose **own name** no longer matches any current global
/// slot gets the same treatment before being dropped: `save.global_ids`
/// carries the name's save-time `DefinitionId` (declared-module identity is
/// `(module, name)`-hashed, so the bare name string alone can't reconstruct
/// it — this is what makes a VAR/CONST/LIST rename inside a *declared*
/// module different from a bare knot rename), which is looked up in the
/// alias table exactly like an address/global-pointer id. A resolved rename
/// rebinds silently to the renamed slot; still unresolved (no id recorded —
/// an older save predating this field — or no matching alias) falls back to
/// [`LoadReport::unknown_globals`], same as before M-3.
///
/// Writes go through [`ContextAccess`], so on a `ContextView` they route by
/// scope exactly like any other write: a `World`-scoped unit lands in the
/// shared `World`, a `Local`-scoped unit in the flow's own `FlowLocal`
/// override layer.
pub fn load_state<C: ContextAccess + ?Sized>(
    program: &Program,
    ctx: &mut C,
    save: &SaveState,
) -> LoadReport {
    let mut report = LoadReport::default();
    let renames_matter = program.has_aliases();

    for (name, value) in &save.globals {
        match program.global_index(name) {
            Some(idx) => {
                let value = if renames_matter {
                    rebind_value(program, value, &mut report)
                } else {
                    // The common path (no `#@was` aliases active): a
                    // bare `Value::clone()`, same mechanism as
                    // `Opcode::GetGlobal`'s read — noted so a full
                    // save/load round trip's Arc-clone count is visible
                    // to `bench-counters` (issue #821 Workstream C), not
                    // just the save half. The `renames_matter` branch
                    // above calls `rebind_value`, which recursively
                    // rebuilds compound values rather than cloning the
                    // top-level `Arc` — not the same mechanism, so not
                    // noted here (would overstate the count).
                    let cloned = value.clone();
                    crate::vm::note_value_share(&cloned);
                    cloned
                };
                ctx.set_global(idx, value);
            }
            None => {
                if let Some(idx) = rebind_global_name(program, renames_matter, save, name) {
                    let value = rebind_value(program, value, &mut report);
                    ctx.set_global(idx, value);
                } else {
                    if renames_matter && save.global_ids.contains_key(name) {
                        report
                            .unresolved_renames
                            .push(teach_was_message("global variable", name));
                    }
                    report.unknown_globals.push(name.clone());
                }
            }
        }
    }

    ctx.set_turn_index(save.turn_index);
    ctx.set_rng_seed(save.rng_seed);
    ctx.set_previous_random(save.previous_random);
    for e in &save.visits {
        ctx.set_visit_count(rebind_address_key(program, e, &mut report), e.count);
    }
    for e in &save.turns {
        ctx.set_turn_count(rebind_address_key(program, e, &mut report), e.count);
    }

    report
}

// ─── M-3 rehydration miss-path lookup (docs/modules-spec.md §5) ───────────

/// Resolve a visit/turn-count entry's saved id against the current program,
/// falling back to the alias table on a direct miss. On a still-unresolved
/// miss: a **named** scope (`entry.path` is `Some`) gets the M-3 teaching
/// message, but only for a program with any alias-table entries at all (an
/// ordinary content edit with no `#@was` directive stays silent, same as
/// before M-3). An **anonymous** scope (`entry.path` is `None` — a gather,
/// choice point, or sequence with no author label) has no path to teach a
/// fix against and — unlike a named miss — can never be recovered through
/// the alias table regardless of whether the program uses `#@was` elsewhere
/// (an alias entry is only ever written against a name), so it is counted
/// in [`LoadReport::anonymous_states_dropped`] unconditionally (issue
/// #1674, gap 4 of the identity cluster) rather than gated on
/// `Program::has_aliases` — the count is the *only* legible signal an
/// anonymous miss gets, so gating it the way the named case is gated would
/// make it silent for the overwhelming majority of projects.
fn rebind_address_key(
    program: &Program,
    entry: &VisitEntry,
    report: &mut LoadReport,
) -> DefinitionId {
    let (id, unresolved) = rebind_address(program, entry.id);
    if unresolved {
        match &entry.path {
            Some(path) if program.has_aliases() => {
                report
                    .unresolved_renames
                    .push(teach_was_message("visit count", path));
            }
            Some(_) => {}
            None => report.anonymous_states_dropped += 1,
        }
    }
    id
}

/// Resolve a saved global's own name against the current program's alias
/// table, when its bare name no longer matches any live global slot
/// (`load_state`'s doc comment). Looks up the name's save-time
/// `DefinitionId` in `save.global_ids`, resolves it through the alias
/// table, and — if the resolved id names a live global slot — returns that
/// slot's index. `None` when there's nothing to attempt (`renames_matter`
/// is `false`, or the save predates `global_ids`) or the lookup doesn't
/// land on a live slot.
fn rebind_global_name(
    program: &Program,
    renames_matter: bool,
    save: &SaveState,
    name: &str,
) -> Option<u32> {
    if !renames_matter {
        return None;
    }
    let old_id = *save.global_ids.get(name)?;
    let new_id = program.resolve_alias(old_id)?;
    program.resolve_global(new_id)
}

/// Resolve a single address-space id (container/scope/label) against the
/// current program, falling back to the alias table on a direct miss.
/// Returns the id to use and whether it's still unresolved after that (no
/// alias, or an alias whose own target doesn't resolve either) — the
/// compiler never emits a multi-hop alias chain (`old -> old2 -> new`), so
/// one alias lookup is always enough; a still-unresolved alias target means
/// the alias itself is stale (e.g. a further edit deleted the renamed
/// definition), which is the same "genuinely gone" outcome as no alias.
fn rebind_address(program: &Program, id: DefinitionId) -> (DefinitionId, bool) {
    if program.knows_address(id) {
        return (id, false);
    }
    match program.resolve_alias(id) {
        Some(new_id) => (new_id, !program.knows_address(new_id)),
        None => (id, true),
    }
}

/// Resolve a global-variable-pointer id (`Value::VariablePointer`) the same
/// way [`rebind_address`] resolves a container/address id, against the
/// global-slot namespace instead.
fn rebind_global(program: &Program, id: DefinitionId) -> (DefinitionId, bool) {
    if program.knows_global(id) {
        return (id, false);
    }
    match program.resolve_alias(id) {
        Some(new_id) => (new_id, !program.knows_global(new_id)),
        None => (id, true),
    }
}

/// Resolve a list-item id (one of a `Value::List`'s active items) the same
/// way [`rebind_address`] resolves a container/address id, against the
/// list-item namespace instead.
fn rebind_list_item(program: &Program, id: DefinitionId) -> (DefinitionId, bool) {
    if program.knows_list_item(id) {
        return (id, false);
    }
    match program.resolve_alias(id) {
        Some(new_id) => (new_id, !program.knows_list_item(new_id)),
        None => (id, true),
    }
}

/// Resolve a list-definition id (one of a `Value::List`'s `origins`) the
/// same way [`rebind_address`] resolves a container/address id, against the
/// list-definition namespace instead.
fn rebind_list_def(program: &Program, id: DefinitionId) -> (DefinitionId, bool) {
    if program.knows_list_def(id) {
        return (id, false);
    }
    match program.resolve_alias(id) {
        Some(new_id) => (new_id, !program.knows_list_def(new_id)),
        None => (id, true),
    }
}

/// The M-3 teaching fault message (`docs/modules-spec.md` §5): "saved
/// {subject} `{path}` resolves to nothing; if `{suggestion}` was renamed,
/// add `#@was({suggestion})`." The suggestion is the path's outermost
/// segment (module-qualified paths look like `module.knot`; the module is
/// usually the rename culprit for a multi-definition miss) falling back to
/// the whole path for an unqualified name (a bare knot rename).
fn teach_was_message(subject: &str, path: &str) -> String {
    let suggestion = path.split('.').next().unwrap_or(path);
    format!(
        "saved {subject} `{path}` resolves to nothing; if `{suggestion}` was renamed, add `#@was({suggestion})`"
    )
}

/// The M-3 teaching fault message for an id with no saved author path (a
/// divert target / fn token / closure target embedded in a global's value —
/// the wire format carries only the numeric id, never a path string).
fn teach_was_message_for_id(subject: &str, id: DefinitionId) -> String {
    format!(
        "saved {subject} {id} resolves to nothing; if its knot, stitch, or function was renamed, add `#@was(old_name)` to it"
    )
}

/// Rebind an address-space id (divert target / fn token / closure target)
/// found inside a saved `Value`, reporting a teaching message when it's
/// still unresolved after the alias-table lookup. Only called when the
/// program has alias-table entries (`load_state`'s `renames_matter` gate) —
/// the report only fires for a program that actually uses `#@was`.
fn rebind_value_address_id(
    program: &Program,
    subject: &str,
    id: DefinitionId,
    report: &mut LoadReport,
) -> DefinitionId {
    let (new_id, unresolved) = rebind_address(program, id);
    if unresolved {
        report
            .unresolved_renames
            .push(teach_was_message_for_id(subject, id));
    }
    new_id
}

/// Rebind a global-pointer id (`Value::VariablePointer`) found inside a
/// saved `Value`, same discipline as [`rebind_value_address_id`].
fn rebind_value_global_id(
    program: &Program,
    id: DefinitionId,
    report: &mut LoadReport,
) -> DefinitionId {
    let (new_id, unresolved) = rebind_global(program, id);
    if unresolved {
        report
            .unresolved_renames
            .push(teach_was_message_for_id("variable pointer", id));
    }
    new_id
}

/// Rebind a list-item id found inside a saved `Value::List`'s active items,
/// same discipline as [`rebind_value_address_id`].
fn rebind_value_list_item_id(
    program: &Program,
    id: DefinitionId,
    report: &mut LoadReport,
) -> DefinitionId {
    let (new_id, unresolved) = rebind_list_item(program, id);
    if unresolved {
        report
            .unresolved_renames
            .push(teach_was_message_for_id("list item", id));
    }
    new_id
}

/// Rebind a list-definition id found inside a saved `Value::List`'s
/// `origins`, same discipline as [`rebind_value_address_id`].
fn rebind_value_list_def_id(
    program: &Program,
    id: DefinitionId,
    report: &mut LoadReport,
) -> DefinitionId {
    let (new_id, unresolved) = rebind_list_def(program, id);
    if unresolved {
        report
            .unresolved_renames
            .push(teach_was_message_for_id("list definition", id));
    }
    new_id
}

/// Recursively rebind M-3 alias-table ids embedded anywhere inside a saved
/// `Value` — divert targets, fn tokens, closure targets and their `ref` env
/// entries, list items/origins inside a `Value::List`, and any of those
/// nested inside an array/map/record. A value with no rename-affected id
/// anywhere in it round-trips unchanged (modulo the `Arc` rebuild
/// collections/records always pay here — load is a one-shot reconciliation,
/// not a hot path, so the simpler always-recurse shape wins over threading a
/// "did anything change" flag through).
fn rebind_value(program: &Program, value: &Value, report: &mut LoadReport) -> Value {
    match value {
        Value::DivertTarget(id) => Value::DivertTarget(rebind_value_address_id(
            program,
            "divert target",
            *id,
            report,
        )),
        Value::FnRef(id) => Value::FnRef(rebind_value_address_id(program, "fn token", *id, report)),
        Value::VariablePointer(id) => {
            Value::VariablePointer(rebind_value_global_id(program, *id, report))
        }
        Value::List(list) => Value::List(Arc::new(ListValue {
            items: list
                .items
                .iter()
                .map(|id| rebind_value_list_item_id(program, *id, report))
                .collect(),
            origins: list
                .origins
                .iter()
                .map(|id| rebind_value_list_def_id(program, *id, report))
                .collect(),
        })),
        Value::Closure(c) => {
            let target = rebind_value_address_id(program, "fn token", c.target, report);
            let env = c
                .env
                .iter()
                .map(|e| ClosureEnvEntry {
                    name: e.name,
                    is_ref: e.is_ref,
                    payload: rebind_value(program, &e.payload, report),
                })
                .collect();
            Value::Closure(Arc::new(ClosureValue { target, env }))
        }
        Value::Array(items) => Value::array(
            items
                .iter()
                .map(|v| rebind_value(program, v, report))
                .collect::<Vec<_>>(),
        ),
        Value::Map(m) => {
            let rebound: OrderedMap = m
                .iter()
                .map(|(k, v)| (k.clone(), rebind_value(program, v, report)))
                .collect();
            Value::map(rebound)
        }
        Value::Record { shape, fields } => Value::Record {
            shape: *shape,
            fields: Arc::new(
                fields
                    .iter()
                    .map(|v| rebind_value(program, v, report))
                    .collect(),
            ),
        },
        // T1e (docs/t1e-spec.md §3): "rehydration validates the root cell
        // like VariablePointer today, and the `#@was` alias table applies
        // to the root's identity on the miss path" — the *same*
        // `rebind_value_global_id` a `VariablePointer` root uses, since a
        // projection's cell reference is that identical payload shape
        // (`docs/format-v4-rfc.md` §1: "cell reference = the existing
        // VAL_VAR_POINTER payload shape, reused not reinvented"). Segment
        // values recurse too — a `Key` segment can itself carry an id
        // needing rebinding (e.g. a divert-target map key is not legal,
        // but a nested closure/array segment value theoretically could be).
        Value::Projection(p) => {
            let cell = rebind_value_global_id(program, p.cell, report);
            let segments = p
                .segments
                .iter()
                .map(|seg| match seg {
                    brink_format::ProjSegment::Index(n) => brink_format::ProjSegment::Index(*n),
                    brink_format::ProjSegment::Key(v) => {
                        brink_format::ProjSegment::Key(rebind_value(program, v, report))
                    }
                })
                .collect();
            Value::projection(cell, segments)
        }
        other => other.clone(),
    }
}

impl<R: StoryRng> Story<R> {
    /// Capture the default flow's game state as a durable, name-keyed
    /// [`SaveState`]. Does not capture execution position. Thin delegating
    /// wrapper over the free [`save_state`] function — see the module docs.
    #[must_use]
    pub fn save_state(&self) -> SaveState {
        save_state(self.program(), &self.default_context)
    }

    /// Reconcile a [`SaveState`] into the default flow's context. Thin
    /// delegating wrapper over the free [`load_state`] function — see the
    /// module docs.
    pub fn load_state(&mut self, save: &SaveState) -> LoadReport {
        let program = self.program_arc();
        load_state(&program, &mut self.default_context, save)
    }
}

#[cfg(test)]
mod tests {
    use std::sync::Arc;

    use super::*;
    use crate::link;
    use crate::rng::FastRng;

    /// Compile a small ink story with the brink compiler and link it.
    fn compile_for_flow(src: &str) -> (Program, Vec<Vec<brink_format::LineEntry>>) {
        let out = brink_compiler::compile("t.ink", |p| {
            if p == "t.ink" {
                Ok(src.to_string())
            } else {
                Err(std::io::Error::new(
                    std::io::ErrorKind::NotFound,
                    "no such include",
                ))
            }
        })
        .expect("compile");
        link(&out.data).expect("link")
    }

    /// `DefinitionId`s are content-hash-based (`brink_format::id`), not an
    /// incrementing counter tied to declaration order — so visiting knots in
    /// declaration order already scrambles hash order, and `Program`'s
    /// container `Vec` (declaration order) doesn't coincidentally match id
    /// order either. `save_state`'s explicit `sort_by_key` is what
    /// guarantees `SaveState::visits`/`turns` come out id-sorted regardless
    /// of visit order or container layout — this locks that invariant down.
    #[test]
    fn visits_are_sorted_by_id_regardless_of_visit_order() {
        let (program, tables) = compile_for_flow(
            "-> alpha\n\
             === alpha ===\n\
             Alpha.\n\
             -> DONE\n\
             === beta ===\n\
             Beta.\n\
             -> DONE\n\
             === gamma ===\n\
             Gamma.\n\
             -> DONE\n\
             === reader ===\n\
             {READ_COUNT(-> alpha)} {READ_COUNT(-> beta)} {READ_COUNT(-> gamma)}\n\
             -> DONE\n",
            // `reader` is never entered at runtime — it exists only so the
            // compiler's counting-flags pass (`apply_counting_flags` in
            // brink-ir) sees a `READ_COUNT` reference to each knot and sets
            // `CountingFlags::VISITS` on it. Without a visit-count *read*
            // somewhere in the program, the compiler leaves counting
            // disabled for a knot (an optimization) and the VM never calls
            // `increment_visit`/`set_turn_count` for it at all.
        );
        let program = Arc::new(program);
        let mut story = crate::Story::<FastRng>::new(Arc::clone(&program), tables);

        // Visit alpha (root divert), then gamma, then beta — an order that
        // matches neither declaration order nor (necessarily) id order.
        story.continue_maximally().expect("continue");
        story.choose_path_string("gamma").expect("jump");
        story.continue_maximally().expect("continue");
        story.choose_path_string("beta").expect("jump");
        story.continue_maximally().expect("continue");

        let save = story.save_state();
        assert_eq!(
            save.visits.len(),
            3,
            "alpha/beta/gamma should each have a visit entry: {:?}",
            save.visits
        );

        let ids: Vec<u64> = save.visits.iter().map(|e| e.id.to_raw()).collect();
        let mut sorted = ids.clone();
        sorted.sort_unstable();
        assert_eq!(ids, sorted, "SaveState::visits must be sorted by id");
    }

    /// Issue #1674: a saved visit/turn-count entry for an **anonymous**
    /// scope (`path: None` — the shape an unlabeled once-only choice or a
    /// sequence's own visit entry carries) that the current program no
    /// longer recognizes is counted in
    /// [`brink_format::LoadReport::anonymous_states_dropped`] — legible
    /// through the existing tolerant `LoadReport` rather than silently
    /// retained under an id nothing can ever reach again. The phantom id
    /// here stands in for what a real content edit does: shift an
    /// unlabeled once-only choice's positional id out from under an
    /// earlier save (see `anonymous_stateful` in `brink-analyzer` for the
    /// companion compile-time lint).
    #[test]
    fn anonymous_unresolved_visit_entry_is_counted_in_load_report() {
        let (program, tables) = compile_for_flow(
            "-> alpha\n\
             === alpha ===\n\
             Alpha.\n\
             -> DONE\n",
        );
        let program = Arc::new(program);
        let mut story = crate::Story::<FastRng>::new(Arc::clone(&program), tables);
        story.continue_maximally().expect("continue");

        let mut save = story.save_state();
        assert!(
            save.visits.iter().all(|e| e.path.is_some()),
            "sanity: the real save has no anonymous entries to confuse this \
             test: {:?}",
            save.visits
        );
        let phantom_id =
            brink_format::DefinitionId::new(brink_format::DefinitionTag::Address, u64::MAX);
        save.visits.push(brink_format::VisitEntry {
            id: phantom_id,
            path: None,
            count: 3,
        });

        let report = story.load_state(&save);
        assert_eq!(report.anonymous_states_dropped, 1, "{report:?}");
        assert!(!report.is_clean(), "{report:?}");
        assert!(
            report.unresolved_renames.is_empty(),
            "an anonymous miss has no path to teach a #@was fix against, \
             so it must never land in unresolved_renames: {report:?}"
        );
    }

    /// A saved **named** scope's unresolved entry (`path: Some(_)`) must
    /// never be counted as an anonymous drop, even when the program has no
    /// `#@was` alias table at all (the ordinary "content edit deleted a
    /// knot" case, which stays silent by design) — the two report channels
    /// are for genuinely different situations and must not bleed into each
    /// other.
    #[test]
    fn named_unresolved_visit_entry_is_not_counted_as_anonymous() {
        let (program, tables) = compile_for_flow(
            "-> alpha\n\
             === alpha ===\n\
             Alpha.\n\
             -> DONE\n",
        );
        let program = Arc::new(program);
        let mut story = crate::Story::<FastRng>::new(Arc::clone(&program), tables);

        let phantom_id =
            brink_format::DefinitionId::new(brink_format::DefinitionTag::Address, u64::MAX);
        let mut save = story.save_state();
        save.visits.push(brink_format::VisitEntry {
            id: phantom_id,
            path: Some("forest.gone_knot".to_owned()),
            count: 3,
        });

        let report = story.load_state(&save);
        assert_eq!(
            report.anonymous_states_dropped, 0,
            "a named miss is not an anonymous drop: {report:?}"
        );
        assert!(
            report.unresolved_renames.is_empty(),
            "no #@was alias table on this program, so the named miss stays \
             silent exactly like before M-3: {report:?}"
        );
    }

    /// The end-to-end proof `anonymous_unresolved_visit_entry_is_counted_
    /// in_load_report` above stops short of: that test's `path: None` entry
    /// is a synthetic phantom id, so it would still pass even if
    /// `save_state` never actually emitted a `path: None` entry for a real
    /// anonymous container (i.e. if the whole feature were dead). This test
    /// compiles two REAL stories and lets a real content edit do the
    /// shifting.
    ///
    /// Story A has one unlabeled once-only choice (`c0` of knot `alpha`,
    /// `stamp::stamp_stmt`'s positional counter) — take it, so its target
    /// container's `path: None` visit/turn entries are real, not
    /// constructed. Story B inserts a *labeled* choice above it: labeling
    /// "extra" makes its own id come from the label, not the `c{N}`
    /// counter, so — unlike an unlabeled insertion, which would just make
    /// "extra" inherit `pick`'s old `c0` id and silently retarget the load
    /// to the wrong choice (the "reappear" hazard E157 warns about, not a
    /// drop) — nothing in program B ends up using the string `"alpha.c0"`
    /// at all: `extra` is label-derived, `pick` shifted to `c1`. Loading
    /// story A's save into story B therefore hits a genuine miss.
    ///
    /// Two entries, not one: a once-only choice's target container carries
    /// both `CountingFlags::VISITS` and `COUNT_START_ONLY`, so `save_state`
    /// emits both a visit *and* a turn entry for it — per this field's own
    /// doc, a scope whose visit *and* turn count both go unresolved counts
    /// as two independent losses, not one.
    #[test]
    fn a_real_content_edit_shifting_an_anonymous_choice_is_counted_in_load_report() {
        let (program_a, tables_a) = compile_for_flow(
            "-> alpha\n\
             === alpha ===\n\
             * [pick]\n\
             \tPicked.\n\
             \t-> DONE\n",
        );
        let program_a = Arc::new(program_a);
        let mut story_a = crate::Story::<FastRng>::new(Arc::clone(&program_a), tables_a);
        story_a.continue_maximally().expect("continue");
        story_a.choose(0).expect("choose `pick`");
        story_a.continue_maximally().expect("continue");

        let save = story_a.save_state();
        assert_eq!(
            save.visits.len(),
            1,
            "sanity: exactly `pick`'s own anonymous visit entry: {:?}",
            save.visits
        );
        assert!(
            save.visits[0].path.is_none(),
            "sanity: a real unlabeled once-only choice's container really \
             does save with `path: None`: {:?}",
            save.visits[0]
        );

        let (program_b, tables_b) = compile_for_flow(
            "-> alpha\n\
             === alpha ===\n\
             * (extra) [extra]\n\
             \tExtra.\n\
             \t-> DONE\n\
             * [pick]\n\
             \tPicked.\n\
             \t-> DONE\n",
        );
        let program_b = Arc::new(program_b);
        let mut story_b = crate::Story::<FastRng>::new(Arc::clone(&program_b), tables_b);

        let report = story_b.load_state(&save);
        assert_eq!(
            report.anonymous_states_dropped, 2,
            "the shifted choice's visit AND turn entry both go unresolved: {report:?}"
        );
        assert!(!report.is_clean(), "{report:?}");
        assert!(
            report.unresolved_renames.is_empty(),
            "an anonymous miss has no path to teach a #@was fix against: {report:?}"
        );
    }
}