def put.str

emerging-ezjson@1.3.0.0 · src/parse.bend:79

import Base
import emerging-ezjson@1.3.0.0/src/value.bend as V

79def put.str(stack: List<&2, Frame>, root: Maybe<&2, V.Json>, key: Key, bad: Bool) -> P:
80  match stack:
81    case Con{FObj{pairs, k, SKey{}}, rest}:
82      P{bad, root, FObj{pairs, key, SColon{}} <> rest}
83    case other:
84      put(stack, root, put.text(key), bad)