ballerina-core 1.0.261 → 1.0.264

package/bin/src/forms/domains/dispatched-forms/deserializer/domains/specification-v2/domains/types/state.js

@@ -1,1086 +0,0 @@
-import { Map } from "immutable";
-import { ValueOrErrors } from "../../../../../../../../collections/domains/valueOrErrors/state";
-import {
-  DispatchGenericTypes,
-  MapRepo,
-  isString,
-} from "../../../../../../../../../main";
-export const DispatchisString = (_) => typeof _ == "string";
-export const DispatchIsObject = (_) => typeof _ == "object";
-export const DispatchIsGenericType = (_) =>
-  _ && DispatchGenericTypes.includes(_);
-export const DispatchHasFun = (_) =>
-  DispatchIsObject(_) && "fun" in _ && DispatchisString(_.fun);
-export const DispatchHasArgs = (_) =>
-  DispatchIsObject(_) && "args" in _ && Array.isArray(_.args);
-export const DispatchPrimitiveTypeNames = [
-  "unit",
-  "guid", //resolves to string
-  "entityIdString", //resolves to string
-  "entityIdUUID", //resolves to string
-  "calculatedDisplayValue", //resolves to string
-  "string",
-  "number",
-  "boolean",
-  "Date",
-  "base64File",
-  "secret",
-];
-const STRINGY_TYPES = [
-  "guid",
-  "entityIdUUID",
-  "entityIdString",
-  "calculatedDisplayValue",
-];
-export const SerializedType = {
-  isExtendedType: (type) =>
-    typeof type == "object" &&
-    "extends" in type &&
-    Array.isArray(type.extends) &&
-    type.extends.length > 0 &&
-    type.extends.every(DispatchisString),
-  hasFields: (type) => typeof type == "object" && "fields" in type,
-  isPrimitive: (_, injectedPrimitives) =>
-    Boolean(
-      DispatchPrimitiveTypeNames.some((__) => _ == __) ||
-        (injectedPrimitives === null || injectedPrimitives === void 0
-          ? void 0
-          : injectedPrimitives.has(_)),
-    ),
-  isApplication: (_) =>
-    DispatchHasFun(_) && DispatchIsGenericType(_.fun) && DispatchHasArgs(_),
-  isLookup: (_, forms) => DispatchisString(_) && forms.has(_),
-  isList: (_) =>
-    SerializedType.isApplication(_) && _.fun == "List" && _.args.length == 1,
-  isMap: (_) =>
-    SerializedType.isApplication(_) && _.fun == "Map" && _.args.length == 2,
-  isSum: (_) =>
-    SerializedType.isApplication(_) && _.fun == "Sum" && _.args.length == 2,
-  isSumUnitDate: (_) => typeof _ == "string" && _ == "SumUnitDate",
-  isSingleSelection: (_) =>
-    SerializedType.isApplication(_) &&
-    _.fun == "SingleSelection" &&
-    _.args.length == 1,
-  isMultiSelection: (_) =>
-    SerializedType.isApplication(_) &&
-    _.fun == "MultiSelection" &&
-    _.args.length == 1,
-  isUnion: (_) =>
-    DispatchHasFun(_) &&
-    DispatchIsGenericType(_.fun) &&
-    DispatchHasArgs(_) &&
-    _.fun == "Union" &&
-    _.args.length > 0 &&
-    _.args.every(
-      (arg) =>
-        (DispatchIsObject(arg) && "caseName" in arg && !("fields" in arg)) ||
-        ("fields" in arg &&
-          (DispatchisString(arg.fields) || DispatchIsObject(arg.fields))),
-    ),
-  isTuple: (_) => SerializedType.isApplication(_) && _.fun == "Tuple",
-  isRecord: (_) =>
-    _ != null &&
-    typeof _ == "object" &&
-    "fields" in _ &&
-    (DispatchIsObject(_.fields) || DispatchisString(_.fields)),
-  isTable: (_) =>
-    SerializedType.isApplication(_) && _.fun == "Table" && _.args.length == 1,
-  isOption: (_) =>
-    typeof _ == "object" &&
-    "fun" in _ &&
-    _.fun == "Option" &&
-    "args" in _ &&
-    Array.isArray(_.args) &&
-    _.args.length == 1,
-  isUnit: (_) => _ == "unit",
-  isKeyOf: (_) =>
-    typeof _ == "object" &&
-    "fun" in _ &&
-    _.fun == "KeyOf" &&
-    "args" in _ &&
-    Array.isArray(_.args) &&
-    (_.args.length == 1 || (_.args.length == 2 && Array.isArray(_.args[1]))) &&
-    DispatchisString(_.args[0]),
-  isOne: (_) =>
-    SerializedType.isApplication(_) && _.fun == "One" && _.args.length == 1,
-  isReadOnly: (_) =>
-    SerializedType.isApplication(_) &&
-    _.fun == "ReadOnly" &&
-    _.args.length == 1,
-  isRecordFields: (_) =>
-    typeof _ == "object" && _ != null && !("fun" in _) && !("args" in _),
-  isTranslationOverride: (_) =>
-    typeof _ == "object" &&
-    _ != null &&
-    "fun" in _ &&
-    _.fun == "TranslationOverride" &&
-    "args" in _ &&
-    Array.isArray(_.args) &&
-    _.args.length == 2 &&
-    DispatchisString(_.args[0]),
-};
-export const UnionType = {
-  SerializeToString: (serializedArgs) => {
-    return `[union; cases: {${serializedArgs.map((v, k) => `${k}: ${v}`).join(", ")}}]`;
-  },
-};
-export const RecordType = {
-  SerializeToString: (serializedFields) => {
-    return `[record; fields: {${serializedFields.map((v, k) => `${k}: ${v}`).join(", ")}}]`;
-  },
-};
-export const LookupType = {
-  SerializeToString: (name) => {
-    return `${name}`;
-  },
-};
-export const DispatchPrimitiveType = {
-  SerializeToString: (name) => {
-    return `[primitive; name: ${String(name)}]`;
-  },
-};
-export const SingleSelectionType = {
-  SerializeToString: (serializedArgs) => {
-    return `[singleSelection; args: [${serializedArgs.join(", ")}]]`;
-  },
-};
-export const MultiSelectionType = {
-  SerializeToString: (serializedArgs) => {
-    return `[multiSelection; args: [${serializedArgs.join(", ")}]]`;
-  },
-};
-export const ListType = {
-  SerializeToString: (serializedArgs) => {
-    return `[list; args: [${serializedArgs.join(", ")}]]`;
-  },
-};
-export const TupleType = {
-  SerializeToString: (serializedArgs) => {
-    return `[tuple; args: [${serializedArgs.join(", ")}]]`;
-  },
-};
-export const SumType = {
-  SerializeToString: (serializedArgs) => {
-    return `[sum; args: [${serializedArgs.join(", ")}]]`;
-  },
-};
-export const SumNType = {
-  SerializeToString: (serializedArgs, arity) => {
-    return `[sumN; arity: ${arity}; args: [${serializedArgs.join(", ")}]]`;
-  },
-};
-export const MapType = {
-  SerializeToString: (serializedArgs) => {
-    return `[map; args: [${serializedArgs.join(", ")}]]`;
-  },
-};
-export const TableType = {
-  SerializeToString: (serializedArg) => {
-    return `[table; arg: ${serializedArg}]`;
-  },
-};
-export const ReadOnlyType = {
-  SerializeToString: (serializedArg) => {
-    return `[readOnly; arg: ${serializedArg}]`;
-  },
-};
-export const OneType = {
-  SerializeToString: (serializedArg) => {
-    return `[one; arg: ${serializedArg}]`;
-  },
-};
-export const FilterContainsType = {
-  SerializeToString: (serializedContains) => {
-    return `[filter; contains: ${serializedContains}]`;
-  },
-};
-export const FilterEqualsToType = {
-  SerializeToString: (serializedEqualsTo) => {
-    return `[filter; equalsTo: ${serializedEqualsTo}]`;
-  },
-};
-export const FilterNotEqualsToType = {
-  SerializeToString: (serializedNotEqualsTo) => {
-    return `[filter; != ${serializedNotEqualsTo}]`;
-  },
-};
-export const FilterGreaterThanOrEqualsToType = {
-  SerializeToString: (serializedGreaterThanOrEqualsTo) => {
-    return `[filter; >= ${serializedGreaterThanOrEqualsTo}]`;
-  },
-};
-export const FilterGreaterThanType = {
-  SerializeToString: (serializedGreaterThan) => {
-    return `[filter; > ${serializedGreaterThan}]`;
-  },
-};
-export const FilterIsNotNullType = {
-  SerializeToString: () => {
-    return `[filter; !=null]`;
-  },
-};
-export const FilterIsNullType = {
-  SerializeToString: () => {
-    return `[filter; =null]`;
-  },
-};
-export const FilterSmallerThanOrEqualsToType = {
-  SerializeToString: (serializedSmallerThanOrEqualsTo) => {
-    return `[filter; <= ${serializedSmallerThanOrEqualsTo}]`;
-  },
-};
-export const FilterSmallerThanType = {
-  SerializeToString: (serializedSmallerThan) => {
-    return `[filter; < ${serializedSmallerThan}]`;
-  },
-};
-export const FilterStartsWithType = {
-  SerializeToString: (serializedStartsWith) => {
-    return `[filter; startsWith ${serializedStartsWith}]`;
-  },
-};
-export const FilterTypeKinds = [
-  "contains",
-  "=",
-  "!=",
-  ">=",
-  ">",
-  "!=null",
-  "=null",
-  "<=",
-  "<",
-  "startsWith",
-];
-export const DispatchParsedType = {
-  Default: {
-    table: (arg) => ({
-      kind: "table",
-      arg,
-      asString: () => TableType.SerializeToString(arg.asString()),
-    }),
-    record: (fields) => ({
-      kind: "record",
-      fields,
-      asString: () =>
-        RecordType.SerializeToString(fields.map((v) => v.asString())),
-    }),
-    primitive: (name) => ({
-      kind: "primitive",
-      name,
-      asString: () => DispatchPrimitiveType.SerializeToString(name),
-    }),
-    singleSelection: (args) => ({
-      kind: "singleSelection",
-      args,
-      asString: () =>
-        SingleSelectionType.SerializeToString(args.map((v) => v.asString())),
-    }),
-    multiSelection: (args) => ({
-      kind: "multiSelection",
-      args,
-      asString: () =>
-        MultiSelectionType.SerializeToString(args.map((v) => v.asString())),
-    }),
-    list: (args) => ({
-      kind: "list",
-      args,
-      asString: () => ListType.SerializeToString(args.map((v) => v.asString())),
-    }),
-    tuple: (args) => ({
-      kind: "tuple",
-      args,
-      asString: () =>
-        TupleType.SerializeToString(args.map((v) => v.asString())),
-    }),
-    sum: (args) => ({
-      kind: "sum",
-      args,
-      asString: () => SumType.SerializeToString(args.map((v) => v.asString())),
-    }),
-    sumN: (args) => ({
-      kind: "sumN",
-      args,
-      asString: () =>
-        SumNType.SerializeToString(
-          args.map((v) => v.asString()),
-          args.length,
-        ),
-    }),
-    map: (args) => ({
-      kind: "map",
-      args,
-      asString: () => MapType.SerializeToString(args.map((v) => v.asString())),
-    }),
-    union: (args) => ({
-      kind: "union",
-      args,
-      asString: () =>
-        UnionType.SerializeToString(args.map((v) => v.asString())),
-    }),
-    readOnly: (arg) => ({
-      kind: "readOnly",
-      arg,
-      asString: () => ReadOnlyType.SerializeToString(arg.asString()),
-    }),
-    lookup: (name) => ({
-      kind: "lookup",
-      name,
-      asString: () => LookupType.SerializeToString(name),
-    }),
-    one: (arg) => ({
-      kind: "one",
-      arg,
-      asString: () => OneType.SerializeToString(arg.asString()),
-    }),
-    filterContains: (contains) => ({
-      kind: "contains",
-      contains,
-      asString: () => FilterContainsType.SerializeToString(contains.asString()),
-    }),
-    filterEqualsTo: (equalsTo) => ({
-      kind: "=",
-      equalsTo,
-      asString: () => FilterEqualsToType.SerializeToString(equalsTo.asString()),
-    }),
-    filterNotEqualsTo: (notEqualsTo) => ({
-      kind: "!=",
-      notEqualsTo,
-      asString: () =>
-        FilterNotEqualsToType.SerializeToString(notEqualsTo.asString()),
-    }),
-    filterGreaterThanOrEqualsTo: (greaterThanOrEqualsTo) => ({
-      kind: ">=",
-      greaterThanOrEqualsTo,
-      asString: () =>
-        FilterGreaterThanOrEqualsToType.SerializeToString(
-          greaterThanOrEqualsTo.asString(),
-        ),
-    }),
-    filterGreaterThan: (greaterThan) => ({
-      kind: ">",
-      greaterThan,
-      asString: () =>
-        FilterGreaterThanType.SerializeToString(greaterThan.asString()),
-    }),
-    filterIsNotNull: () => ({
-      kind: "!=null",
-      asString: () => FilterIsNotNullType.SerializeToString(),
-    }),
-    filterIsNull: () => ({
-      kind: "=null",
-      asString: () => FilterIsNullType.SerializeToString(),
-    }),
-    filterSmallerThanOrEqualsTo: (smallerThanOrEqualsTo) => ({
-      kind: "<=",
-      smallerThanOrEqualsTo,
-      asString: () =>
-        FilterSmallerThanOrEqualsToType.SerializeToString(
-          smallerThanOrEqualsTo.asString(),
-        ),
-    }),
-    filterSmallerThan: (smallerThan) => ({
-      kind: "<",
-      smallerThan,
-      asString: () =>
-        FilterSmallerThanType.SerializeToString(smallerThan.asString()),
-    }),
-    filterStartsWith: (startsWith) => ({
-      kind: "startsWith",
-      startsWith,
-      asString: () =>
-        FilterStartsWithType.SerializeToString(startsWith.asString()),
-    }),
-  },
-  Operations: {
-    // We don't use this at the moment, if we need it, then we can fix
-    // Equals: <T>(
-    //   fst: DispatchParsedType<T>,
-    //   snd: DispatchParsedType<T>,
-    // ): boolean =>
-    //   fst.kind == "record" && snd.kind == "record"
-    //     ? fst.name == snd.name
-    //     : fst.kind == "table" && snd.kind == "table"
-    //       ? fst.name == snd.name
-    //       : fst.kind == "one" && snd.kind == "one"
-    //         ? fst.name == snd.name
-    //         : fst.kind == "lookup" && snd.kind == "lookup"
-    //           ? fst.name == snd.name
-    //           : fst.kind == "primitive" && snd.kind == "primitive"
-    //             ? fst.name == snd.name
-    //             : fst.kind == "list" && snd.kind == "list"
-    //               ? fst.name == snd.name
-    //               : fst.kind == "singleSelection" &&
-    //                   snd.kind == "singleSelection"
-    //                 ? fst.name == snd.name
-    //                 : fst.kind == "multiSelection" &&
-    //                     snd.kind == "multiSelection"
-    //                   ? fst.name == snd.name
-    //                   : fst.kind == "map" && snd.kind == "map"
-    //                     ? fst.name == snd.name
-    //                     : fst.kind == "sum" && snd.kind == "sum"
-    //                       ? fst.name == snd.name
-    //                       : fst.kind == "tuple" && snd.kind == "tuple"
-    //                         ? fst.name == snd.name &&
-    //                           fst.args.length == snd.args.length &&
-    //                           fst.args.every((v, i) =>
-    //                             DispatchParsedType.Operations.Equals(
-    //                               v,
-    //                               snd.args[i],
-    //                             ),
-    //                           )
-    //                         : fst.kind == "union" && snd.kind == "union"
-    //                           ? fst.args.size == snd.args.size &&
-    //                             fst.args.every(
-    //                               (v, i) => v.name == snd.args.get(i)!.name,
-    //                             )
-    //                           : false,
-    ParseRawKeyOf: (rawType, typeNames, serializedTypes, alreadyParsedTypes) =>
-      (alreadyParsedTypes.has(rawType.args[0])
-        ? alreadyParsedTypes
-            .get(rawType.args[0])
-            .Then((parsedType) =>
-              ValueOrErrors.Default.return([parsedType, alreadyParsedTypes]),
-            )
-        : DispatchParsedType.Operations.ParseRawType(
-            rawType.args[0],
-            serializedTypes[rawType.args[0]],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-          )
-      )
-        .Then((parsingResult) =>
-          parsingResult[0].kind != "record"
-            ? ValueOrErrors.Default.throwOne(
-                `Error: ${JSON.stringify(parsingResult[0])} is not a record type`,
-              )
-            : ValueOrErrors.Default.return([
-                DispatchParsedType.Default.union(
-                  Map(
-                    parsingResult[0].fields
-                      .keySeq()
-                      .filter(
-                        (key) =>
-                          rawType.args[1] == undefined ||
-                          !rawType.args[1].includes(key),
-                      )
-                      .toArray()
-                      .map((key) => [
-                        key,
-                        DispatchParsedType.Default.record(Map()),
-                      ]),
-                  ),
-                ),
-                parsingResult[1],
-              ]),
-        )
-        .MapErrors((errors) =>
-          errors.map((error) => `${error}\n...When parsing keyOf type`),
-        ),
-    SerializeToString: (type) => {
-      switch (type.kind) {
-        case "primitive":
-          return DispatchPrimitiveType.SerializeToString(type.name);
-        case "record":
-          return RecordType.SerializeToString(
-            type.fields.map((v) =>
-              DispatchParsedType.Operations.SerializeToString(v),
-            ),
-          );
-        case "table":
-          return TableType.SerializeToString(
-            DispatchParsedType.Operations.SerializeToString(type.arg),
-          );
-        case "one":
-          return OneType.SerializeToString(
-            DispatchParsedType.Operations.SerializeToString(type.arg),
-          );
-        case "singleSelection":
-          return SingleSelectionType.SerializeToString(
-            type.args.map((v) =>
-              DispatchParsedType.Operations.SerializeToString(v),
-            ),
-          );
-        case "multiSelection":
-          return MultiSelectionType.SerializeToString(
-            type.args.map((v) =>
-              DispatchParsedType.Operations.SerializeToString(v),
-            ),
-          );
-        case "list":
-          return ListType.SerializeToString(
-            type.args.map((v) =>
-              DispatchParsedType.Operations.SerializeToString(v),
-            ),
-          );
-        case "tuple":
-          return TupleType.SerializeToString(
-            type.args.map((v) =>
-              DispatchParsedType.Operations.SerializeToString(v),
-            ),
-          );
-        case "sum":
-          return SumType.SerializeToString(
-            type.args.map((v) =>
-              DispatchParsedType.Operations.SerializeToString(v),
-            ),
-          );
-        case "sumN":
-          return SumNType.SerializeToString(
-            type.args.map((v) =>
-              DispatchParsedType.Operations.SerializeToString(v),
-            ),
-            type.args.length,
-          );
-        case "map":
-          return MapType.SerializeToString(
-            type.args.map((v) =>
-              DispatchParsedType.Operations.SerializeToString(v),
-            ),
-          );
-        case "union":
-          return UnionType.SerializeToString(
-            type.args.map((v) =>
-              DispatchParsedType.Operations.SerializeToString(v),
-            ),
-          );
-        case "lookup":
-          return LookupType.SerializeToString(type.name);
-        case "contains":
-          return FilterContainsType.SerializeToString(type.contains.asString());
-        case "=":
-          return FilterEqualsToType.SerializeToString(type.equalsTo.asString());
-        case "!=":
-          return FilterNotEqualsToType.SerializeToString(
-            type.notEqualsTo.asString(),
-          );
-        case ">=":
-          return FilterGreaterThanOrEqualsToType.SerializeToString(
-            type.greaterThanOrEqualsTo.asString(),
-          );
-        case ">":
-          return FilterGreaterThanType.SerializeToString(
-            type.greaterThan.asString(),
-          );
-        case "!=null":
-          return FilterIsNotNullType.SerializeToString();
-        case "=null":
-          return FilterIsNullType.SerializeToString();
-        case "<=":
-          return FilterSmallerThanOrEqualsToType.SerializeToString(
-            type.smallerThanOrEqualsTo.asString(),
-          );
-        case "<":
-          return FilterSmallerThanType.SerializeToString(
-            type.smallerThan.asString(),
-          );
-        case "startsWith":
-          return FilterStartsWithType.SerializeToString(
-            type.startsWith.asString(),
-          );
-        default:
-          throw new Error(`Unknown type: ${JSON.stringify(type)}`);
-      }
-    },
-    GetExtendedRecordTypes: (extendedTypeName, alreadyParsedTypes) => {
-      return MapRepo.Operations.tryFindWithError(
-        extendedTypeName,
-        alreadyParsedTypes,
-        () => `cannot find extended type ${extendedTypeName} in types`,
-      ).Then((extendedType) =>
-        extendedType.Then((extendedType) =>
-          extendedType.kind != "record"
-            ? ValueOrErrors.Default.throwOne(
-                `Error: ${JSON.stringify(extendedType)} is not a record type`,
-              )
-            : ValueOrErrors.Default.return([extendedTypeName, extendedType]),
-        ),
-      );
-    },
-    ParseRecord: (
-      typeName,
-      rawType,
-      typeNames,
-      serializedTypes,
-      alreadyParsedTypes,
-      injectedPrimitives,
-    ) =>
-      !SerializedType.isRecord(rawType)
-        ? ValueOrErrors.Default.throwOne(
-            `Error: ${JSON.stringify(rawType)} is not a valid record`,
-          )
-        : (SerializedType.isExtendedType(rawType)
-            ? rawType.extends
-                .reduce(
-                  (acc, extendedTypeName) =>
-                    acc.Then(([resultMap, accumulatedAlreadyParsedTypes]) =>
-                      accumulatedAlreadyParsedTypes.has(extendedTypeName)
-                        ? DispatchParsedType.Operations.GetExtendedRecordTypes(
-                            extendedTypeName,
-                            accumulatedAlreadyParsedTypes,
-                          ).Then(([extendedTypeName, recordType]) =>
-                            ValueOrErrors.Default.return([
-                              resultMap.set(extendedTypeName, recordType),
-                              accumulatedAlreadyParsedTypes,
-                            ]),
-                          )
-                        : serializedTypes[extendedTypeName] == undefined
-                          ? ValueOrErrors.Default.throwOne(
-                              `Error: cannot find extended type ${extendedTypeName} in types`,
-                            )
-                          : DispatchParsedType.Operations.ParseRawType(
-                              extendedTypeName,
-                              serializedTypes[extendedTypeName],
-                              typeNames,
-                              serializedTypes,
-                              accumulatedAlreadyParsedTypes,
-                              injectedPrimitives,
-                            ).Then((parsedType) =>
-                              parsedType[0].kind == "record"
-                                ? ValueOrErrors.Default.return([
-                                    resultMap.set(
-                                      extendedTypeName,
-                                      parsedType[0],
-                                    ),
-                                    parsedType[1],
-                                  ])
-                                : ValueOrErrors.Default.throwOne(
-                                    `Error: ${JSON.stringify(parsedType[0])} is not a record type`,
-                                  ),
-                            ),
-                    ),
-                  ValueOrErrors.Default.return([Map(), alreadyParsedTypes]),
-                )
-                .MapErrors((errors) =>
-                  errors.map(
-                    (error) => `${error}\n...When parsing extended types`,
-                  ),
-                )
-                .Then(
-                  ([
-                    parsedExtendedRecordTypesMap,
-                    accumulatedAlreadyParsedTypes,
-                  ]) =>
-                    ValueOrErrors.Default.return([
-                      parsedExtendedRecordTypesMap,
-                      accumulatedAlreadyParsedTypes,
-                    ]),
-                )
-            : ValueOrErrors.Default.return([Map(), alreadyParsedTypes])
-          ).Then(
-            ([parsedExtendedRecordTypesMap, accumulatedAlreadyParsedTypes]) =>
-              Object.entries(rawType.fields)
-                .reduce(
-                  (acc, [fieldName, fieldType]) =>
-                    acc.Then(
-                      ([
-                        parsedFieldsMap,
-                        accumulatedAlreadyParsedTypesForFields,
-                      ]) =>
-                        DispatchParsedType.Operations.ParseRawType(
-                          fieldName,
-                          fieldType,
-                          typeNames,
-                          serializedTypes,
-                          accumulatedAlreadyParsedTypesForFields,
-                          injectedPrimitives,
-                        ).Then((parsedField) =>
-                          ValueOrErrors.Default.return([
-                            parsedFieldsMap.set(fieldName, parsedField[0]),
-                            parsedField[1],
-                          ]),
-                        ),
-                    ),
-                  ValueOrErrors.Default.return([
-                    Map(),
-                    accumulatedAlreadyParsedTypes,
-                  ]),
-                )
-                .Then(
-                  ([parsedFieldsMap, accumulatedAlreadyParsedTypesForFields]) =>
-                    ValueOrErrors.Default.return(
-                      DispatchParsedType.Default.record(
-                        parsedFieldsMap.merge(
-                          parsedExtendedRecordTypesMap.reduce(
-                            (acc, type) => acc.merge(type.fields),
-                            Map(),
-                          ),
-                        ),
-                      ),
-                    ).Then((parsedRecord) =>
-                      ValueOrErrors.Default.return([
-                        parsedRecord,
-                        parsedExtendedRecordTypesMap.reduce(
-                          (acc, type, name) =>
-                            acc.set(name, ValueOrErrors.Default.return(type)),
-                          accumulatedAlreadyParsedTypesForFields,
-                        ),
-                      ]),
-                    ),
-                ),
-          ),
-    ParseRawFilterType: (rawFilterType, arg) => {
-      if (typeof rawFilterType != "string") {
-        return ValueOrErrors.Default.throwOne(`rawType is not a string`);
-      }
-      switch (rawFilterType) {
-        case "contains":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterContains(arg),
-          );
-        case "equalsTo":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterEqualsTo(arg),
-          );
-        case "startswith":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterStartsWith(arg),
-          );
-        case "!=":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterNotEqualsTo(arg),
-          );
-        case "=":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterEqualsTo(arg),
-          );
-        case ">=":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterGreaterThanOrEqualsTo(arg),
-          );
-        case ">":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterGreaterThan(arg),
-          );
-        case "<=":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterSmallerThanOrEqualsTo(arg),
-          );
-        case "<":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterSmallerThan(arg),
-          );
-        case "=null":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterIsNull(),
-          );
-        case "!=null":
-          return ValueOrErrors.Default.return(
-            DispatchParsedType.Default.filterIsNotNull(),
-          );
-        default:
-          return ValueOrErrors.Default.throwOne(
-            `Unknown filter type: ${rawFilterType}`,
-          );
-      }
-    },
-    ParseRawType: (
-      typeName,
-      rawType,
-      typeNames,
-      serializedTypes,
-      alreadyParsedTypes,
-      injectedPrimitives,
-    ) => {
-      if (
-        alreadyParsedTypes.has(typeName) &&
-        !SerializedType.isLookup(rawType, typeNames)
-      )
-        return alreadyParsedTypes
-          .get(typeName)
-          .Then((parsedType) =>
-            ValueOrErrors.Default.return([parsedType, alreadyParsedTypes]),
-          );
-      const result = (() => {
-        if (SerializedType.isPrimitive(rawType, injectedPrimitives))
-          return ValueOrErrors.Default.return([
-            DispatchParsedType.Default.primitive(
-              typeof rawType === "string" && STRINGY_TYPES.includes(rawType)
-                ? "string"
-                : rawType,
-            ),
-            alreadyParsedTypes,
-          ]);
-        if (SerializedType.isSingleSelection(rawType))
-          return DispatchParsedType.Operations.ParseRawType(
-            `SingleSelection:Element`,
-            rawType.args[0],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedArg, newAlreadyParsedTypes]) =>
-            ValueOrErrors.Default.return([
-              DispatchParsedType.Default.singleSelection([parsedArg]),
-              newAlreadyParsedTypes,
-            ]),
-          );
-        if (SerializedType.isMultiSelection(rawType))
-          return DispatchParsedType.Operations.ParseRawType(
-            `MultiSelection:Element`,
-            rawType.args[0],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedArg, newAlreadyParsedTypes]) =>
-            ValueOrErrors.Default.return([
-              DispatchParsedType.Default.multiSelection([parsedArg]),
-              newAlreadyParsedTypes,
-            ]),
-          );
-        if (SerializedType.isList(rawType))
-          return DispatchParsedType.Operations.ParseRawType(
-            `List:Element`,
-            rawType.args[0],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedArg, newAlreadyParsedTypes]) =>
-            ValueOrErrors.Default.return([
-              DispatchParsedType.Default.list([parsedArg]),
-              newAlreadyParsedTypes,
-            ]),
-          );
-        if (SerializedType.isTuple(rawType))
-          return rawType.args
-            .reduce(
-              (acc, arg, index) =>
-                acc.Then(([parsedArgsArray, accumulatedAlreadyParsedTypes]) =>
-                  DispatchParsedType.Operations.ParseRawType(
-                    `Tuple:Item ${index + 1}`,
-                    arg,
-                    typeNames,
-                    serializedTypes,
-                    accumulatedAlreadyParsedTypes,
-                    injectedPrimitives,
-                  ).Then((parsedArg) =>
-                    ValueOrErrors.Default.return([
-                      [...parsedArgsArray, parsedArg[0]],
-                      parsedArg[1],
-                    ]),
-                  ),
-                ),
-              ValueOrErrors.Default.return([[], alreadyParsedTypes]),
-            )
-            .Then(([parsedArgsArray, accumulatedAlreadyParsedTypes]) =>
-              ValueOrErrors.Default.return([
-                DispatchParsedType.Default.tuple(parsedArgsArray),
-                accumulatedAlreadyParsedTypes,
-              ]),
-            );
-        if (SerializedType.isMap(rawType))
-          return DispatchParsedType.Operations.ParseRawType(
-            "Map:Key",
-            rawType.args[0],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedArg0, newAlreadyParsedTypes]) =>
-            DispatchParsedType.Operations.ParseRawType(
-              "Map:Value",
-              rawType.args[1],
-              typeNames,
-              serializedTypes,
-              newAlreadyParsedTypes,
-              injectedPrimitives,
-            ).Then(([parsedArg1, newAlreadyParsedTypes2]) =>
-              ValueOrErrors.Default.return([
-                DispatchParsedType.Default.map([parsedArg0, parsedArg1]),
-                newAlreadyParsedTypes2,
-              ]),
-            ),
-          );
-        if (SerializedType.isSum(rawType))
-          return DispatchParsedType.Operations.ParseRawType(
-            "Sum:Left",
-            rawType.args[0],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedArg0, newAlreadyParsedTypes]) =>
-            DispatchParsedType.Operations.ParseRawType(
-              "Sum:Right",
-              rawType.args[1],
-              typeNames,
-              serializedTypes,
-              newAlreadyParsedTypes,
-              injectedPrimitives,
-            ).Then(([parsedArg1, newAlreadyParsedTypes2]) =>
-              ValueOrErrors.Default.return([
-                DispatchParsedType.Default.sum([parsedArg0, parsedArg1]),
-                newAlreadyParsedTypes2,
-              ]),
-            ),
-          );
-        if (SerializedType.isRecord(rawType))
-          return DispatchParsedType.Operations.ParseRecord(
-            typeName,
-            rawType,
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          );
-        if (SerializedType.isTable(rawType)) {
-          return DispatchParsedType.Operations.ParseRawType(
-            "TableArg",
-            rawType.args[0],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedArg, newAlreadyParsedTypes]) =>
-            parsedArg.kind != "lookup"
-              ? ValueOrErrors.Default.throwOne(
-                  `Error: ${JSON.stringify(parsedArg)} is not a lookup type`,
-                )
-              : ValueOrErrors.Default.return([
-                  DispatchParsedType.Default.table(parsedArg),
-                  newAlreadyParsedTypes,
-                ]),
-          );
-        }
-        if (SerializedType.isLookup(rawType, typeNames)) {
-          const resolvedType = serializedTypes[rawType];
-          console.debug(typeName, rawType, resolvedType);
-          return DispatchParsedType.Operations.ParseRawType(
-            typeName,
-            resolvedType,
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedType, newAlreadyParsedTypes]) =>
-            ValueOrErrors.Default.return([
-              DispatchParsedType.Default.lookup(rawType),
-              newAlreadyParsedTypes.set(
-                rawType,
-                ValueOrErrors.Default.return(parsedType),
-              ),
-            ]),
-          );
-        }
-        if (SerializedType.isUnit(rawType)) {
-          return ValueOrErrors.Default.return([
-            DispatchParsedType.Default.primitive("unit"),
-            alreadyParsedTypes,
-          ]);
-        }
-        if (SerializedType.isUnion(rawType))
-          return rawType.args
-            .reduce(
-              (acc, unionCase) =>
-                acc.Then(
-                  ([parsedUnionCasesMap, accumulatedAlreadyParsedTypes]) =>
-                    DispatchParsedType.Operations.ParseRawType(
-                      isString(unionCase.fields)
-                        ? unionCase.fields
-                        : `Union:Case ${unionCase.caseName}`,
-                      unionCase.fields == undefined
-                        ? { fields: {} }
-                        : // we allow the record fields to be defined directly in the spec instead of
-                          // inside a fields key
-                          SerializedType.isRecordFields(unionCase.fields)
-                          ? { fields: unionCase.fields }
-                          : unionCase.fields,
-                      typeNames,
-                      serializedTypes,
-                      accumulatedAlreadyParsedTypes,
-                      injectedPrimitives,
-                    ).Then(([parsedType, newAlreadyParsedTypes]) =>
-                      ValueOrErrors.Default.return([
-                        parsedUnionCasesMap.set(unionCase.caseName, parsedType),
-                        newAlreadyParsedTypes,
-                      ]),
-                    ),
-                ),
-              ValueOrErrors.Default.return([Map(), alreadyParsedTypes]),
-            )
-            .Then(([parsedUnionCasesMap, accumulatedAlreadyParsedTypes]) =>
-              ValueOrErrors.Default.return([
-                DispatchParsedType.Default.union(parsedUnionCasesMap),
-                accumulatedAlreadyParsedTypes,
-              ]),
-            );
-        if (SerializedType.isOne(rawType)) {
-          return DispatchParsedType.Operations.ParseRawType(
-            rawType.args[0],
-            rawType.args[0],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedArg, newAlreadyParsedTypes]) =>
-            parsedArg.kind != "lookup"
-              ? ValueOrErrors.Default.throwOne(
-                  `one content type ${JSON.stringify(parsedArg)} is not a lookup type`,
-                )
-              : ValueOrErrors.Default.return([
-                  DispatchParsedType.Default.one(parsedArg),
-                  newAlreadyParsedTypes,
-                ]),
-          );
-        }
-        if (SerializedType.isReadOnly(rawType))
-          return DispatchParsedType.Operations.ParseRawType(
-            "ReadOnly:Element",
-            rawType.args[0],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedArg, newAlreadyParsedTypes]) =>
-            ValueOrErrors.Default.return([
-              DispatchParsedType.Default.readOnly(parsedArg),
-              newAlreadyParsedTypes,
-            ]),
-          );
-        if (SerializedType.isKeyOf(rawType))
-          return DispatchParsedType.Operations.ParseRawKeyOf(
-            rawType,
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-          );
-        if (SerializedType.isTranslationOverride(rawType))
-          return DispatchParsedType.Operations.ParseRawType(
-            "TranslationOverride:Language",
-            rawType.args[0],
-            typeNames,
-            serializedTypes,
-            alreadyParsedTypes,
-            injectedPrimitives,
-          ).Then(([parsedArg0, newAlreadyParsedTypes]) =>
-            ValueOrErrors.Default.return([
-              DispatchParsedType.Default.map([
-                DispatchParsedType.Default.singleSelection([parsedArg0]),
-                DispatchParsedType.Default.primitive("string"),
-              ]),
-              newAlreadyParsedTypes,
-            ]),
-          );
-        return ValueOrErrors.Default.throwOne(
-          `Unrecognised type "${typeName}" : ${JSON.stringify(rawType)}`,
-        );
-      })();
-      return result.MapErrors((errors) =>
-        errors.map((error) => `${error}\n...When parsing type "${typeName}"`),
-      );
-    },
-    ResolveLookupType: (typeName, types) =>
-      MapRepo.Operations.tryFindWithError(
-        typeName,
-        types,
-        () => `cannot find lookup type ${typeName} in types`,
-      ),
-    AsResolvedType: (type, types) =>
-      type.kind == "lookup"
-        ? DispatchParsedType.Operations.ResolveLookupType(type.name, types)
-        : ValueOrErrors.Default.return(type),
-  },
-};
-//# sourceMappingURL=state.js.map