def originals

bendvy-ecs-core@0.1.0.4 · event_notice_runtime.bend:21

import Base
import bendvy-ecs-core@0.1.0.4/relation_commands.bend as Notice

21def originals(~S:Data,~P:Data,records:List<&2,Notice.Notice<S,P>>) -> List<&2,P>:
22  match records:
23    case []:[]
24    case Notice.Original{event} <> rest:event <> originals(~S,~P,rest)
25    case Notice.RelationFailed{_} <> rest:originals(~S,~P,rest)
26    case Notice.ComponentRemoved{_} <> rest:originals(~S,~P,rest)
27    case Notice.CleanupPaused{_} <> rest:originals(~S,~P,rest)