def clauses

bendvy-ecs-core@0.1.0.4 · ordinary_app_description.bend:14

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

14def clauses(~S:Data,kind:Records.RegistrationKind,access:List<&2,String>,retained:List<&2,Query.Clause<S>>) -> List<&2,Query.Clause<S>>:
15  match kind:
16    case Records.ComponentKind{}:retained
17    case Records.FieldKind{}:retained
18    case Records.ServiceKind{}:[]
19    case Records.EventKind{}:retained
20    case Records.MixedKind{uses}:mixed_clauses(~S,uses)
21    case Records.ResourceKind{mode}:resource_clauses(~S,mode,access)