def facts_unpacked

bendvy-ecs-core@0.1.0.3 · execution_generalized_command_leaf.bend:60

import Base
import bendvy-ecs-core@0.1.0.3/execution_composer_layout.bend as L
import bendvy-ecs-core@0.1.0.3/execution_declaration.bend as D
import bendvy-ecs-core@0.1.0.3/execution_command_system.bend as Cmd
import bendvy-ecs-core@0.1.0.3/execution_system.bend as Sys
import bendvy-ecs-core@0.1.0.3/execution_retained_system.bend as Retained
import bendvy-ecs-core@0.1.0.3/dependency_registration.bend as Reg
import bendvy-ecs-core@0.1.0.3/dependency_plan.bend as Plan
import bendvy-ecs-core@0.1.0.3/world.bend as W

60def facts_unpacked(~S:Data,~components:L.Layout,~resources:L.Layout,~E:Data,~route:L.Route,~Ops:Data -> (Type -> Type) -> Type -> Type -> Type,~User:Type,~Error:Data,~Out:Data,~declaration:Cmd.Program(~S,~L.columns(~S,components),~L.resources(~S,resources),~components,~resources,~route,~Ops),~body:Cmd.Body(~S,~components,~resources,~route,~Ops,~User,~Error,~Out),~compiled:Compilation(~S,~components,~resources,~route,~Ops),node:Compilation(~S,~components,~resources,~route,~Ops) & Owner(~S,~components,~resources,~E,~route,~Ops,~User,~Error,~Out,~declaration,~body)) -> Reg.Registry<W.World<S,L.columns(~S,components),L.resources(~S,resources),E>,Node(~S,~components,~resources,~E,~route,~Ops,~User,~Error,~Out,~declaration,~body),Error,Out,dispatch(~S,~components,~resources,~E,~route,~Ops,~User,~Error,~Out,~declaration,~body,~compiled)>:
61  match node:
62    case (D.Supported{D.Declaration{caps,+requirements},recipes},Cmd.Owner{Sys.Owner{namespace,+id,name,access,cursor,local}}):Reg.Registry{Retained.pack(Compilation(~S,~components,~resources,~route,~Ops),Owner(~S,~components,~resources,~E,~route,~Ops,~User,~Error,~Out,~declaration,~body),D.Supported{D.Declaration{caps,requirements},recipes},Cmd.Owner{Sys.Owner{namespace,id,name,access,cursor,local}}),[Plan.Node{id,D.qualified(requirements)}]}
63    case (D.Unsupported{caps,+requirements,recipes},Cmd.Owner{Sys.Owner{namespace,+id,name,access,cursor,local}}):Reg.Registry{Retained.pack(Compilation(~S,~components,~resources,~route,~Ops),Owner(~S,~components,~resources,~E,~route,~Ops,~User,~Error,~Out,~declaration,~body),D.Unsupported{caps,requirements,recipes},Cmd.Owner{Sys.Owner{namespace,id,name,access,cursor,local}}),[Plan.Node{id,D.qualified(requirements)}]}