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>
13 lines
419 B
Text
13 lines
419 B
Text
# system.ludic - the shop as a system: a reset and nothing saved (the week's demand follows from
|
|
# the day, and nobody is at a counter across a save)
|
|
export function shop_reset(shop_st: mut ShopState) -> void {
|
|
shop_st.shop_at = -1
|
|
shop_demand_reset(shop_st)
|
|
q_clear(shop_trades(shop_st))
|
|
}
|
|
|
|
export function shop_system() -> System {
|
|
let s = system_new("shop", PH_COMMIT)
|
|
s.reset = fn shop_reset
|
|
return s
|
|
}
|