Function parseExtended

article/utils.ts:520–542

(code: string)

}

export function parseExtended(code: string) {
  return subsetSystem(
    parse(code),
    ["Boolean", "Number", "Func", "Object", "TaggedUnion"],
    [
      "true",
      "false",
      "if",
      "number",
      "add",
      "var",
      "func",
      "call",
      "seq",
      "const",
      "objectNew",
      "objectGet",
      "taggedUnionNew",
      "taggedUnionGet",
      "recFunc",
    ],
  );
}

export function parseSub(code: string) {
  return subsetSystem(