def resources

bendvy-ecs-core@0.1.0.4 · ordinary_dump_render.bend:12

import Base
import bendvy-ecs-core@0.1.0.4/schema_fragments.bend as Fragment
import bendvy-ecs-core@0.1.0.4/ordinary_dump_filter.bend as Filter

12def resources(~S:Data,pairs:List<&1,Fragment.Entry<S> & Maybe<&2,String>>) -> List<&2,Filter.Value>:
13  match pairs:
14    case []:[]
15    case (Fragment.Entry{Fragment.Resource{},key,_},Some{text}) <> rest:Filter.Value{key,text} <> resources(~S,rest)
16    case _ <> rest:resources(~S,rest)