def access

bendvy-ecs-core@0.1.0.4 · ordinary_resource_field_system.bend:70

import Base
import bendvy-ecs-core@0.1.0.4/ordinary_query_declaration.bend as Q

70# Ordered clause-name projection for registration, preserving duplicates/order.
71# No string normalization grants additional field authority.
72def access(~S:Data,clauses:List<&2,Q.Clause<S>>) -> List<&2,String>:
73  match clauses:
74    case []:[]
75    case Q.Clause{name,_} <> rest:name <> access(~S,rest)