def register

bendvy-ecs-core@0.1.0.3 · execution_event_family.bend:72

import Base

72def register(~S:Data,~P:Type,~key:String,start:Start,family:Family<S,P,key>) -> Family<S,P,key> & Registration<S,P,key>:
73  match family:
74    case Family{identity,False{},log,previous,current,nextReader,active,dropped}:(Family{identity,False{},log,previous,current,nextReader,active,dropped},RegistrationRefused{Closed{}})
75    case Family{identity,True{},log,previous,current,+nextReader,active,dropped}:register_checked(~S,~P,~key,start,U32.is_lt(nextReader,4294967295),Family{identity,True{},log,previous,current,nextReader,active,dropped})