def apply

bendvy-ecs-core@0.1.0.3 · execution_machine_access.bend:32

import Base
import bendvy-ecs-core@0.1.0.3/execution_machine_state.bend as State
import bendvy-ecs-core@0.1.0.3/execution_access.bend as A

32def apply(~S:Data,~K:Data,~V:Data,~H:Type,~same:V -> V -> Bool,cap:A.ResourceWrite<H,State.Cell<S,K,V>,State.View<S,K,V>>) -> Apply<S,K,V,H>:
33  match cap:
34    case A.ResourceWrite{get,_,_,own_at}:Apply{own_at(State.Intent<V>,applying(~S,~K,~V,~same)),get}