def replaced

bendvy-ecs-core@0.1.0.4 · recoverable_array_owner.bend:22

import Base
import bendvy-ecs-core@0.1.0.4/owner_product.bend as Product
import bendvy-ecs-core@0.1.0.4/recoverable_array.bend as A
import bendvy-ecs-core@0.1.0.4/recovery_journal.bend as Journal

22def replaced(~State:Type,~P:Type,~Rest:Type,~lens:Product.Lens<State,Array<P>,Rest>,~Recovery:Type,~ReleasedRest:Type,~release:Product.Lens<Recovery,List<A.Record<P>>,ReleasedRest>,journal:List<Journal.Action(~State,~Recovery)>,result:State & Array<P>) -> State & List<Journal.Action(~State,~Recovery)>:
23  match result:
24    case (state,old):record(~State,~P,~Rest,~lens,~Recovery,~ReleasedRest,~release,state,journal,A.Replaced{old})