def context_returned

bendvy-ecs-core@0.1.0.4 · event_family_routing.bend:180

import Base
import bendvy-ecs-core@0.1.0.4/execution_context.bend as Ctx
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/event_runtime.bend as Ev
import bendvy-ecs-core@0.1.0.4/trace_facts.bend as Facts
import bendvy-ecs-core@0.1.0.4/event_stream.bend as Leaf

180# Advanced transport from traced route result to context form, preserving all
181# actual owners and completion; does not execute or acknowledge another reader.
182def context_returned(~S:Data,~C:Type,~R:Type,~P:Data,~E:Data,~F:Type,~A:Type,~Error:Data,~O:Type,~take:F -> F & Leaf.Stream<S,E>,~put:F -> Leaf.Stream<S,E> -> F,~runner:W.World<S,C,R,P> -> Ev.Input<E,A> -> Sys.Outcome<W.World<S,C,R,P>,Error,O>,result:RunResult<S,C,R,P,E,F,A,Error,O,take,put,runner> & Facts.State) -> ContextRunResult<S,C,R,P,E,F,A,Error,O,take,put,runner>:
183  match result:
184    case (Ran{Runtime{world,family,tick},reader,registry,completion},trace):ContextRan{Ctx.Context{world,trace},family,tick,reader,registry,completion}