def runner

bendvy-ecs-core@0.1.0.4 · ordinary_recoverable_array_resource.bend:63

import Base
import bendvy-ecs-core@0.1.0.4/world.bend as W
import bendvy-ecs-core@0.1.0.4/system.bend as Sys
import bendvy-ecs-core@0.1.0.4/ordinary_schema.bend as Schema
import bendvy-ecs-core@0.1.0.4/recoverable_array.bend as A
import bendvy-ecs-core@0.1.0.4/transaction.bend as T

63def runner(~S:Data,~C:Type,~P:Type,~E:Data,~identity:Schema.Resource<S,Array<P>>,~Args:Type,~Error:Data,~Out:Type,~body:@-H:Type -> @-caps:Write<S,P,identity,H> -> Args -> H -> H & (T.Outcome<Error> & Out),world:W.World<S,C,Array<P>,E>,args:Args) -> Sys.Outcome<W.World<S,C,Array<P>,E>,Unit,Reply<Error,Out,P>>:
64  returned(~S,~C,~P,~E,~Error,~Out,body(Frame<W.World<S,C,Array<P>,E>,List<A.Record<P>>>,grant(~S,~C,~P,~E,~identity),args,Frame{world,[]}))