ludic/packages/ludic.fire/system.ludic
Orkuncakilkaya 71735b10a2 feat(base): 0.R4 - a queue keeps its own count, so every package verb takes only its own state; ludic migrate state --prune
ludic.base's Queue<T> carries a QueueTag (its name and pending count): queue_new(name), q_push(q, v),
q_drain(q), q_clear(q) take no BaseState, and core_undrained(tags) names the given queues still holding
facts. A reducer on a package's state can now call that package's verbs (wallet_earn(wallet_st, n)).

ludic migrate state --prune (ludicc --migrate-prune) takes out each state parameter a function no
longer uses, nor anything it calls, and the argument that fills it - including an argument for a
parameter the callee has dropped, which is taken out before the call is checked, so a generic's T is
told by the argument that says it. A reducer keeps its state. --dry-run now counts the edits it would
make. Every package was moved with it: 608 base_st parameters and their arguments, 1889 edits.

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
2026-09-26 04:19:56 +03:00

26 lines
833 B
Text

# system.ludic - the fire as a system: PH_SIMULATE, and its own save section
function fire_tick(fire_st: mut FireState, t: Tick) -> void { fire_run(fire_st, t.hours) }
export function fire_save(fire_st: FireState) -> Val {
let v = Value.object()
sv_put_bool(v, "lit", fire_st.fr_lit)
sv_put_float(v, "fuel", fire_st.fr_fuel)
sv_put_float(v, "rain_h", fire_st.fr_rain_h)
return v
}
export function fire_load(fire_st: mut FireState, v: Val, version: int) -> void {
fire_reset(fire_st)
fire_st.fr_lit = sv_bool(v, "lit", false)
fire_st.fr_fuel = sv_float(v, "fuel", 0.0)
fire_st.fr_rain_h = sv_float(v, "rain_h", 0.0)
}
export function fire_system() -> System {
let s = system_new("fire", PH_SIMULATE)
s.reset = fn fire_reset
s.tick = fn fire_tick
s.save = fn fire_save
s.load = fn fire_load
return s
}