def write

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

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

24def write(-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>>) -> Write<S,K,V,H>:
25  match cap:
26    case A.ResourceWrite{get,_,_,own_at}:Write{get,request => own_at(Unit,State.queued_at_generic(S,K,V,same,request))}