def removal_events_kept

bendvy-ecs-core@0.1.0.4 · ordinary_reader_stream_parameter.bend:442

import Base
import bendvy-ecs-core@0.1.0.4/relation_commands.bend as Notice
import bendvy-ecs-core@0.1.0.4/ordinary_declaration.bend as Identity
import bendvy-ecs-core@0.1.0.4/removals.bend as Rm

442def removal_events_kept(~S:Data,~P:Data,~Payload:Type,
443  ~select:Notice.Notice<S,P> -> Maybe<&2,Rm.Record<S,Identity.Declaration<S,Payload>>>,
444  events:List<&2,Notice.Notice<S,P>>) -> List<&2,Notice.Notice<S,P>>:
445  match events:
446    case []:[]
447    case event <> rest:removal_event_kept(~S,~P,~Payload,~select,event,removal_events_kept(~S,~P,~Payload,~select,rest))