def adopt.go

cswap-bend-cli@0.1.0.0 · urec.bend:200

import Base
import cswap-bend-cli@0.1.0.0/ustore.bend as Ustore

200def adopt.go(rs: List<&2, Reading>, ar: AR, +hold: Maybe<&2, U32>, +now: U32) -> AR:
201  match rs ar:
202    case Nil{} _:
203      ar
204    case Con{Reading{+id, usage, age}, t} AR{+rows, adopted, kept}:
205      adopt.go(t, adopt.put(adopt.row(adopt.stored(Ustore.row_of(rows, id), id), usage, age, hold, now), Ustore.slot_of(id), rows, adopted, kept), hold, now)