def registered

bendvy-ecs-core@0.1.0.4 · ordinary_machine_condition.bend:27

import Base
import bendvy-ecs-core@0.1.0.4/ordinary_machine_initialization.bend as Init
import bendvy-ecs-core@0.1.0.4/system.bend as Sys

27def registered(~S:Data,~K:Data,~V:Data,~R:Type,~take:R -> R & Init.State<S,K,V>,~put:R -> Init.State<S,K,V> -> R,~C:Type,~E:Data,result:Sys.RegistrationResult<S,C,R,E,Nat,Unit,Nat & Bool,runner(~S,~K,~V,~R,~take,~put,~C,~E)>) -> Definition<S,K,V,C,R,E,take,put>:
28  match result:
29    case Sys.Registered{world,registry}:Defined{world,Instance{registry,0n}}
30    case Sys.RegistrationFailed{world}:DefinitionRejected{world}