def kids.put

ezmcp@0.1.0.0 · src/openapi.bend:515

import Base
import emerging-ezjson@1.2.0.0/src/value.bend as Value

515def kids.put(
516  +ps: List<&2, Mem()>,
517  kid: Kids,
518  props: Value.Json -> Value.Json,
519  item: Value.Json -> Value.Json
520) -> Value.Json:
521  match kid:
522    case NoKids{}:
523      object(ps)
524    case PropKids{cs}:
525      object(put(ps, "properties", Value.JObj{props(cs)}))
526    case ItemKid{got}:
527      object(put(ps, "items", item(got)))