def set

bendvy-ecs-core@0.1.0.4 · ordinary_owned_event_resource.bend:27

import Base
import bendvy-ecs-core@0.1.0.4/compose.bend as Q
import bendvy-ecs-core@0.1.0.4/owned_event_storage.bend as Storage
import bendvy-ecs-core@0.1.0.4/owned_event_log.bend as Log
import bendvy-ecs-core@0.1.0.4/resource_field.bend as Field

27def set(~S:Data,~C:Type,~R:Type,~P:Type,owner:Q.Frame<S,C,Storage.Resources<R,P>,Nat>,replacement:R) -> Q.Frame<S,C,Storage.Resources<R,P>,Nat>:
28  match owner:
29    case Q.Frame{tx,handle,error,cursor}:Q.Frame{Field.tx_set(~S,~C,~Storage.Resources<R,P>,~Nat,~R,~Log.Log<P>,~lens(~R,~P),tx,replacement),handle,error,cursor}