Orkuncakilkaya
71735b10a2
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>
31 lines
1 KiB
Text
31 lines
1 KiB
Text
# system.ludic - the reader as a system: what has been read and the last bearing are saved; the
|
|
# prints themselves are the ground's and are not (the animals leave new ones)
|
|
export function tracks_reset(tracks_st: mut TracksState) -> void {
|
|
tracks_st.tk_read_n = 0
|
|
tracks_st.tk_yaw = 0.0
|
|
tracks_st.tk_has_yaw = false
|
|
q_clear(tracks_reads(tracks_st))
|
|
}
|
|
|
|
export function tracks_save(tracks_st: TracksState) -> Val {
|
|
let v = Value.object()
|
|
sv_put_int(v, "read", tracks_st.tk_read_n)
|
|
sv_put_bool(v, "has_yaw", tracks_st.tk_has_yaw)
|
|
sv_put_float(v, "yaw", tracks_st.tk_yaw)
|
|
return v
|
|
}
|
|
|
|
export function tracks_load(tracks_st: mut TracksState, v: Val, version: int) -> void {
|
|
tracks_reset(tracks_st)
|
|
tracks_st.tk_read_n = sv_int(v, "read", 0)
|
|
tracks_st.tk_has_yaw = sv_bool(v, "has_yaw", false)
|
|
tracks_st.tk_yaw = sv_float(v, "yaw", 0.0)
|
|
}
|
|
|
|
export function tracks_system() -> System {
|
|
let s = system_new("tracks", PH_SIMULATE)
|
|
s.reset = fn tracks_reset
|
|
s.save = fn tracks_save
|
|
s.load = fn tracks_load
|
|
return s
|
|
}
|