def clauses

bendvy-ecs-core@0.1.0.4 · ordinary_app_access.bend:30

import Base
import bendvy-ecs-core@0.1.0.4/ordinary_app_registration_fields.bend as Records
import bendvy-ecs-core@0.1.0.4/ordinary_query_declaration.bend as Query
import bendvy-ecs-core@0.1.0.4/ordinary_app_description.bend as Description

30def clauses(~S:Data,kind:Records.RegistrationKind,access:List<&2,String>,retained:List<&2,Query.Clause<S>>) -> List<&2,Query.Clause<S>>:
31  match kind:
32    case Records.ComponentKind{}:retained
33    case Records.FieldKind{}:retained
34    case Records.ServiceKind{}:[]
35    case Records.EventKind{}:retained
36    case Records.MixedKind{uses}:Description.mixed_clauses(~S,uses)
37    case Records.ResourceKind{mode}:resource_fields(~S,mode,access)