From c8336ee48791f00378a35e463e2962f4c856beb2 Mon Sep 17 00:00:00 2001 From: Elizabeth Hunt Date: Mon, 26 Feb 2024 14:59:58 -0700 Subject: [PATCH] format parser, add support for negative integers and return specifically which type of number --- src/parser/grammar.pegjs | 9 +- src/parser/parser.ts | 10010 +++++++++++++++++++------------------ 2 files changed, 5205 insertions(+), 4814 deletions(-) diff --git a/src/parser/grammar.pegjs b/src/parser/grammar.pegjs index 007bc1d..d267b58 100644 --- a/src/parser/grammar.pegjs +++ b/src/parser/grammar.pegjs @@ -269,6 +269,7 @@ ArithmeticOperation / "/" / "*" / "**" + / "%" BitOperation = ">>" @@ -285,17 +286,17 @@ ComparisonOperation / ">" / "<" -Integer = digits:[0-9]+ !"." { return parseInt(digits.join(''), 10); } +Integer = digits:("-"? [0-9]+) !"." { return { int: parseInt(digits.join(''), 10) }; } QuotedString = "'" content:[^']* "'" { return content.join(''); } / "\"" content:[^"]* "\"" { return content.join(''); } Real - = value:("-"? [0-9]+ "." [0-9]+) { - return parseFloat( + = value:("-"? [0-9]+ ("." [0-9]+)?) { + return { real: parseFloat( value.map(x => (Array.isArray(x) ? x.join('') : x)).join(''), - ); + ) }; } Literal diff --git a/src/parser/parser.ts b/src/parser/parser.ts index c3708cf..d38d5a9 100644 --- a/src/parser/parser.ts +++ b/src/parser/parser.ts @@ -1,5039 +1,5411 @@ /* eslint-disable */ +const peggyParser: { parse: any; SyntaxError: any; DefaultTracer?: any } = // @generated by Peggy 4.0.0. + // + // https://peggyjs.org/ + // @ts-ignore + (function () { + // @ts-ignore + 'use strict'; - -const peggyParser: {parse: any, SyntaxError: any, DefaultTracer?: any} = // @generated by Peggy 4.0.0. -// -// https://peggyjs.org/ -// @ts-ignore -(function() { -// @ts-ignore - "use strict"; - -// @ts-ignore -function peg$subclass(child, parent) { -// @ts-ignore - function C() { this.constructor = child; } -// @ts-ignore - C.prototype = parent.prototype; -// @ts-ignore - child.prototype = new C(); -} - -// @ts-ignore -function peg$SyntaxError(message, expected, found, location) { -// @ts-ignore - var self = Error.call(this, message); - // istanbul ignore next Check is a necessary evil to support older environments -// @ts-ignore - if (Object.setPrototypeOf) { -// @ts-ignore - Object.setPrototypeOf(self, peg$SyntaxError.prototype); - } -// @ts-ignore - self.expected = expected; -// @ts-ignore - self.found = found; -// @ts-ignore - self.location = location; -// @ts-ignore - self.name = "SyntaxError"; -// @ts-ignore - return self; -} - -// @ts-ignore -peg$subclass(peg$SyntaxError, Error); - -// @ts-ignore -function peg$padEnd(str, targetLength, padString) { -// @ts-ignore - padString = padString || " "; -// @ts-ignore - if (str.length > targetLength) { return str; } -// @ts-ignore - targetLength -= str.length; -// @ts-ignore - padString += padString.repeat(targetLength); -// @ts-ignore - return str + padString.slice(0, targetLength); -} - -// @ts-ignore -peg$SyntaxError.prototype.format = function(sources) { -// @ts-ignore - var str = "Error: " + this.message; -// @ts-ignore - if (this.location) { -// @ts-ignore - var src = null; -// @ts-ignore - var k; -// @ts-ignore - for (k = 0; k < sources.length; k++) { -// @ts-ignore - if (sources[k].source === this.location.source) { -// @ts-ignore - src = sources[k].text.split(/\r\n|\n|\r/g); -// @ts-ignore - break; + // @ts-ignore + function peg$subclass(child, parent) { + // @ts-ignore + function C() { + // @ts-ignore + this.constructor = child; } + // @ts-ignore + C.prototype = parent.prototype; + // @ts-ignore + child.prototype = new C(); } -// @ts-ignore - var s = this.location.start; -// @ts-ignore - var offset_s = (this.location.source && (typeof this.location.source.offset === "function")) -// @ts-ignore - ? this.location.source.offset(s) -// @ts-ignore - : s; -// @ts-ignore - var loc = this.location.source + ":" + offset_s.line + ":" + offset_s.column; -// @ts-ignore - if (src) { -// @ts-ignore - var e = this.location.end; -// @ts-ignore - var filler = peg$padEnd("", offset_s.line.toString().length, ' '); -// @ts-ignore - var line = src[s.line - 1]; -// @ts-ignore - var last = s.line === e.line ? e.column : line.length + 1; -// @ts-ignore - var hatLen = (last - s.column) || 1; -// @ts-ignore - str += "\n --> " + loc + "\n" -// @ts-ignore - + filler + " |\n" -// @ts-ignore - + offset_s.line + " | " + line + "\n" -// @ts-ignore - + filler + " | " + peg$padEnd("", s.column - 1, ' ') -// @ts-ignore - + peg$padEnd("", hatLen, "^"); -// @ts-ignore - } else { -// @ts-ignore - str += "\n at " + loc; + + // @ts-ignore + function peg$SyntaxError(message, expected, found, location) { + // @ts-ignore + var self = Error.call(this, message); + // istanbul ignore next Check is a necessary evil to support older environments + // @ts-ignore + if (Object.setPrototypeOf) { + // @ts-ignore + Object.setPrototypeOf(self, peg$SyntaxError.prototype); + } + // @ts-ignore + self.expected = expected; + // @ts-ignore + self.found = found; + // @ts-ignore + self.location = location; + // @ts-ignore + self.name = 'SyntaxError'; + // @ts-ignore + return self; } - } -// @ts-ignore - return str; -}; -// @ts-ignore -peg$SyntaxError.buildMessage = function(expected, found) { -// @ts-ignore - var DESCRIBE_EXPECTATION_FNS = { -// @ts-ignore - literal: function(expectation) { -// @ts-ignore - return "\"" + literalEscape(expectation.text) + "\""; - }, + // @ts-ignore + peg$subclass(peg$SyntaxError, Error); -// @ts-ignore - class: function(expectation) { -// @ts-ignore - var escapedParts = expectation.parts.map(function(part) { -// @ts-ignore - return Array.isArray(part) -// @ts-ignore - ? classEscape(part[0]) + "-" + classEscape(part[1]) -// @ts-ignore - : classEscape(part); - }); - -// @ts-ignore - return "[" + (expectation.inverted ? "^" : "") + escapedParts.join("") + "]"; - }, - -// @ts-ignore - any: function() { -// @ts-ignore - return "any character"; - }, - -// @ts-ignore - end: function() { -// @ts-ignore - return "end of input"; - }, - -// @ts-ignore - other: function(expectation) { -// @ts-ignore - return expectation.description; + // @ts-ignore + function peg$padEnd(str, targetLength, padString) { + // @ts-ignore + padString = padString || ' '; + // @ts-ignore + if (str.length > targetLength) { + return str; + } + // @ts-ignore + targetLength -= str.length; + // @ts-ignore + padString += padString.repeat(targetLength); + // @ts-ignore + return str + padString.slice(0, targetLength); } - }; -// @ts-ignore - function hex(ch) { -// @ts-ignore - return ch.charCodeAt(0).toString(16).toUpperCase(); - } - -// @ts-ignore - function literalEscape(s) { -// @ts-ignore - return s -// @ts-ignore - .replace(/\\/g, "\\\\") -// @ts-ignore - .replace(/"/g, "\\\"") -// @ts-ignore - .replace(/\0/g, "\\0") -// @ts-ignore - .replace(/\t/g, "\\t") -// @ts-ignore - .replace(/\n/g, "\\n") -// @ts-ignore - .replace(/\r/g, "\\r") -// @ts-ignore - .replace(/[\x00-\x0F]/g, function(ch) { return "\\x0" + hex(ch); }) -// @ts-ignore - .replace(/[\x10-\x1F\x7F-\x9F]/g, function(ch) { return "\\x" + hex(ch); }); - } - -// @ts-ignore - function classEscape(s) { -// @ts-ignore - return s -// @ts-ignore - .replace(/\\/g, "\\\\") -// @ts-ignore - .replace(/\]/g, "\\]") -// @ts-ignore - .replace(/\^/g, "\\^") -// @ts-ignore - .replace(/-/g, "\\-") -// @ts-ignore - .replace(/\0/g, "\\0") -// @ts-ignore - .replace(/\t/g, "\\t") -// @ts-ignore - .replace(/\n/g, "\\n") -// @ts-ignore - .replace(/\r/g, "\\r") -// @ts-ignore - .replace(/[\x00-\x0F]/g, function(ch) { return "\\x0" + hex(ch); }) -// @ts-ignore - .replace(/[\x10-\x1F\x7F-\x9F]/g, function(ch) { return "\\x" + hex(ch); }); - } - -// @ts-ignore - function describeExpectation(expectation) { -// @ts-ignore - return DESCRIBE_EXPECTATION_FNS[expectation.type](expectation); - } - -// @ts-ignore - function describeExpected(expected) { -// @ts-ignore - var descriptions = expected.map(describeExpectation); -// @ts-ignore - var i, j; - -// @ts-ignore - descriptions.sort(); - -// @ts-ignore - if (descriptions.length > 0) { -// @ts-ignore - for (i = 1, j = 1; i < descriptions.length; i++) { -// @ts-ignore - if (descriptions[i - 1] !== descriptions[i]) { -// @ts-ignore - descriptions[j] = descriptions[i]; -// @ts-ignore - j++; + // @ts-ignore + peg$SyntaxError.prototype.format = function (sources) { + // @ts-ignore + var str = 'Error: ' + this.message; + // @ts-ignore + if (this.location) { + // @ts-ignore + var src = null; + // @ts-ignore + var k; + // @ts-ignore + for (k = 0; k < sources.length; k++) { + // @ts-ignore + if (sources[k].source === this.location.source) { + // @ts-ignore + src = sources[k].text.split(/\r\n|\n|\r/g); + // @ts-ignore + break; + } + } + // @ts-ignore + var s = this.location.start; + // @ts-ignore + var offset_s = + this.location.source && + typeof this.location.source.offset === 'function' + ? // @ts-ignore + this.location.source.offset(s) + : // @ts-ignore + s; + // @ts-ignore + var loc = + this.location.source + ':' + offset_s.line + ':' + offset_s.column; + // @ts-ignore + if (src) { + // @ts-ignore + var e = this.location.end; + // @ts-ignore + var filler = peg$padEnd('', offset_s.line.toString().length, ' '); + // @ts-ignore + var line = src[s.line - 1]; + // @ts-ignore + var last = s.line === e.line ? e.column : line.length + 1; + // @ts-ignore + var hatLen = last - s.column || 1; + // @ts-ignore + str += + '\n --> ' + + loc + + '\n' + + // @ts-ignore + filler + + ' |\n' + + // @ts-ignore + offset_s.line + + ' | ' + + line + + '\n' + + // @ts-ignore + filler + + ' | ' + + peg$padEnd('', s.column - 1, ' ') + + // @ts-ignore + peg$padEnd('', hatLen, '^'); + // @ts-ignore + } else { + // @ts-ignore + str += '\n at ' + loc; } } -// @ts-ignore - descriptions.length = j; - } + // @ts-ignore + return str; + }; -// @ts-ignore - switch (descriptions.length) { -// @ts-ignore - case 1: -// @ts-ignore - return descriptions[0]; + // @ts-ignore + peg$SyntaxError.buildMessage = function (expected, found) { + // @ts-ignore + var DESCRIBE_EXPECTATION_FNS = { + // @ts-ignore + literal: function (expectation) { + // @ts-ignore + return '"' + literalEscape(expectation.text) + '"'; + }, -// @ts-ignore - case 2: -// @ts-ignore - return descriptions[0] + " or " + descriptions[1]; + // @ts-ignore + class: function (expectation) { + // @ts-ignore + var escapedParts = expectation.parts.map(function (part) { + // @ts-ignore + return Array.isArray(part) + ? // @ts-ignore + classEscape(part[0]) + '-' + classEscape(part[1]) + : // @ts-ignore + classEscape(part); + }); -// @ts-ignore - default: -// @ts-ignore - return descriptions.slice(0, -1).join(", ") -// @ts-ignore - + ", or " -// @ts-ignore - + descriptions[descriptions.length - 1]; - } - } + // @ts-ignore + return ( + '[' + + (expectation.inverted ? '^' : '') + + escapedParts.join('') + + ']' + ); + }, -// @ts-ignore - function describeFound(found) { -// @ts-ignore - return found ? "\"" + literalEscape(found) + "\"" : "end of input"; - } + // @ts-ignore + any: function () { + // @ts-ignore + return 'any character'; + }, -// @ts-ignore - return "Expected " + describeExpected(expected) + " but " + describeFound(found) + " found."; -}; + // @ts-ignore + end: function () { + // @ts-ignore + return 'end of input'; + }, -// @ts-ignore -function peg$parse(input, options) { -// @ts-ignore - options = options !== undefined ? options : {}; - -// @ts-ignore - var peg$FAILED = {}; -// @ts-ignore - var peg$source = options.grammarSource; - -// @ts-ignore - var peg$startRuleFunctions = { Program: peg$parseProgram }; -// @ts-ignore - var peg$startRuleFunction = peg$parseProgram; - -// @ts-ignore - var peg$c0 = "**"; - var peg$c1 = ">>"; - var peg$c2 = "<<"; - var peg$c3 = "=="; - var peg$c4 = "<="; - var peg$c5 = ">="; - var peg$c6 = "!="; - var peg$c7 = "."; - var peg$c8 = "'"; - var peg$c9 = "\""; - var peg$c10 = "-"; - var peg$c11 = "OFFSET"; - var peg$c12 = "OFFp"; - var peg$c13 = "SELp"; - var peg$c14 = "VAR"; - var peg$c15 = "INT"; - var peg$c16 = "REAL"; - var peg$c17 = "STRING"; - var peg$c18 = "APP"; - var peg$c19 = "RECORD"; - var peg$c20 = "SELECT"; - var peg$c21 = "FIX"; - var peg$c22 = "SWITCH"; - var peg$c23 = "PRIMOP"; - var peg$c24 = "LABEL"; - var peg$c25 = "store"; - var peg$c26 = "update"; - var peg$c27 = "makeref"; - var peg$c28 = "makerefunboxed"; - var peg$c29 = "unboxedupdate"; - var peg$c30 = "subscript"; - var peg$c31 = "boxed"; - var peg$c32 = "_"; - var peg$c33 = "["; - var peg$c34 = "]"; - var peg$c35 = ","; - var peg$c36 = "="; - var peg$c37 = "("; - var peg$c38 = ")"; - var peg$c39 = "\r\n"; - - var peg$r0 = /^[A-Za-z]/; - var peg$r1 = /^[0-9A-Z_a-z]/; - var peg$r2 = /^[*-+\-\/]/; - var peg$r3 = /^[\^~]/; - var peg$r4 = /^[!<>]/; - var peg$r5 = /^[0-9]/; - var peg$r6 = /^[^']/; - var peg$r7 = /^[^"]/; - var peg$r8 = /^[\t-\n ]/; - - var peg$e0 = peg$classExpectation([["A", "Z"], ["a", "z"]], false, false); - var peg$e1 = peg$classExpectation([["0", "9"], ["A", "Z"], "_", ["a", "z"]], false, false); - var peg$e2 = peg$classExpectation([["*", "+"], "-", "/"], false, false); - var peg$e3 = peg$literalExpectation("**", false); - var peg$e4 = peg$literalExpectation(">>", false); - var peg$e5 = peg$literalExpectation("<<", false); - var peg$e6 = peg$classExpectation(["^", "~"], false, false); - var peg$e7 = peg$literalExpectation("==", false); - var peg$e8 = peg$literalExpectation("<=", false); - var peg$e9 = peg$literalExpectation(">=", false); - var peg$e10 = peg$literalExpectation("!=", false); - var peg$e11 = peg$classExpectation(["!", "<", ">"], false, false); - var peg$e12 = peg$classExpectation([["0", "9"]], false, false); - var peg$e13 = peg$literalExpectation(".", false); - var peg$e14 = peg$literalExpectation("'", false); - var peg$e15 = peg$classExpectation(["'"], true, false); - var peg$e16 = peg$literalExpectation("\"", false); - var peg$e17 = peg$classExpectation(["\""], true, false); - var peg$e18 = peg$literalExpectation("-", false); - var peg$e19 = peg$literalExpectation("OFFSET", false); - var peg$e20 = peg$literalExpectation("OFFp", false); - var peg$e21 = peg$literalExpectation("SELp", false); - var peg$e22 = peg$literalExpectation("VAR", false); - var peg$e23 = peg$literalExpectation("INT", false); - var peg$e24 = peg$literalExpectation("REAL", false); - var peg$e25 = peg$literalExpectation("STRING", false); - var peg$e26 = peg$literalExpectation("APP", false); - var peg$e27 = peg$literalExpectation("RECORD", false); - var peg$e28 = peg$literalExpectation("SELECT", false); - var peg$e29 = peg$literalExpectation("FIX", false); - var peg$e30 = peg$literalExpectation("SWITCH", false); - var peg$e31 = peg$literalExpectation("PRIMOP", false); - var peg$e32 = peg$literalExpectation("LABEL", false); - var peg$e33 = peg$literalExpectation("store", false); - var peg$e34 = peg$literalExpectation("update", false); - var peg$e35 = peg$literalExpectation("makeref", false); - var peg$e36 = peg$literalExpectation("makerefunboxed", false); - var peg$e37 = peg$literalExpectation("unboxedupdate", false); - var peg$e38 = peg$literalExpectation("subscript", false); - var peg$e39 = peg$literalExpectation("boxed", false); - var peg$e40 = peg$literalExpectation("_", false); - var peg$e41 = peg$literalExpectation("[", false); - var peg$e42 = peg$literalExpectation("]", false); - var peg$e43 = peg$literalExpectation(",", false); - var peg$e44 = peg$literalExpectation("=", false); - var peg$e45 = peg$literalExpectation("(", false); - var peg$e46 = peg$literalExpectation(")", false); - var peg$e47 = peg$classExpectation([["\t", "\n"], " "], false, false); - var peg$e48 = peg$literalExpectation("\r\n", false); -// @ts-ignore - - var peg$f0 = function(exprs) { -// @ts-ignore - return exprs.filter(x => !Array.isArray(x)); - };// @ts-ignore - - var peg$f1 = function(record, val, bind, continuation) {// @ts-ignore - return { select: { record, val, bind, continuation } }; };// @ts-ignore - - var peg$f2 = function(index, val, bind, continuation) {// @ts-ignore - return { offset: { index, val, bind, continuation } }; };// @ts-ignore - - var peg$f3 = function(identifiers, lastIdent) { -// @ts-ignore - return identifiers.length || lastIdent -// @ts-ignore - ? [...identifiers.map(x => x[0]), lastIdent] - : []; - };// @ts-ignore - - var peg$f4 = function(values, lastValue) { -// @ts-ignore - return values.length || lastValue -// @ts-ignore - ? [...values.map(x => x[0]), lastValue] - : []; - };// @ts-ignore - - var peg$f5 = function(switchIndex, continuations) {// @ts-ignore - return { switch: { switchIndex, continuations } }; };// @ts-ignore - - var peg$f6 = function(fn, args) { -// @ts-ignore - return { application: { fn, args } }; - };// @ts-ignore - - var peg$f7 = function(bindings, lastBinding) { -// @ts-ignore - return bindings.length || lastBinding -// @ts-ignore - ? [...bindings.map(x => x[0]), lastBinding] - : []; - };// @ts-ignore - - var peg$f8 = function(fixBindings, continuation) {// @ts-ignore - return { fix: { fixBindings, continuation } }; };// @ts-ignore - - var peg$f9 = function(continuations, lastContinuation) { -// @ts-ignore - return lastContinuation || continuations.length -// @ts-ignore - ? [...continuations.map(x => x[0]), lastContinuation] - : []; - };// @ts-ignore - - var peg$f10 = function(opr, operands, resultBindings, continuations) { -// @ts-ignore - return { -// @ts-ignore - primitiveOperation: { opr, operands, resultBindings, continuations }, - }; - };// @ts-ignore - - var peg$f11 = function(variable, offset) {// @ts-ignore - return { variable, offset }; };// @ts-ignore - - var peg$f12 = function(records, lastRecord) { -// @ts-ignore - return records.length || lastRecord -// @ts-ignore - ? [...records.map(x => x[0]), lastRecord] - : []; - };// @ts-ignore - - var peg$f13 = function(records, address, body) { -// @ts-ignore - return { -// @ts-ignore - record: { -// @ts-ignore - records, -// @ts-ignore - address, -// @ts-ignore - body, + // @ts-ignore + other: function (expectation) { + // @ts-ignore + return expectation.description; }, }; - };// @ts-ignore - var peg$f14 = function(ident) {// @ts-ignore - return ident; };// @ts-ignore + // @ts-ignore + function hex(ch) { + // @ts-ignore + return ch.charCodeAt(0).toString(16).toUpperCase(); + } - var peg$f15 = function(ident) {// @ts-ignore - return ident; };// @ts-ignore + // @ts-ignore + function literalEscape(s) { + // @ts-ignore + return ( + s + // @ts-ignore + .replace(/\\/g, '\\\\') + // @ts-ignore + .replace(/"/g, '\\"') + // @ts-ignore + .replace(/\0/g, '\\0') + // @ts-ignore + .replace(/\t/g, '\\t') + // @ts-ignore + .replace(/\n/g, '\\n') + // @ts-ignore + .replace(/\r/g, '\\r') + // @ts-ignore + .replace(/[\x00-\x0F]/g, function (ch) { + return '\\x0' + hex(ch); + }) + // @ts-ignore + .replace(/[\x10-\x1F\x7F-\x9F]/g, function (ch) { + return '\\x' + hex(ch); + }) + ); + } - var peg$f16 = function(int) {// @ts-ignore - return int; };// @ts-ignore + // @ts-ignore + function classEscape(s) { + // @ts-ignore + return ( + s + // @ts-ignore + .replace(/\\/g, '\\\\') + // @ts-ignore + .replace(/\]/g, '\\]') + // @ts-ignore + .replace(/\^/g, '\\^') + // @ts-ignore + .replace(/-/g, '\\-') + // @ts-ignore + .replace(/\0/g, '\\0') + // @ts-ignore + .replace(/\t/g, '\\t') + // @ts-ignore + .replace(/\n/g, '\\n') + // @ts-ignore + .replace(/\r/g, '\\r') + // @ts-ignore + .replace(/[\x00-\x0F]/g, function (ch) { + return '\\x0' + hex(ch); + }) + // @ts-ignore + .replace(/[\x10-\x1F\x7F-\x9F]/g, function (ch) { + return '\\x' + hex(ch); + }) + ); + } - var peg$f17 = function(real) {// @ts-ignore - return real; };// @ts-ignore + // @ts-ignore + function describeExpectation(expectation) { + // @ts-ignore + return DESCRIBE_EXPECTATION_FNS[expectation.type](expectation); + } - var peg$f18 = function(string) {// @ts-ignore - return string; };// @ts-ignore + // @ts-ignore + function describeExpected(expected) { + // @ts-ignore + var descriptions = expected.map(describeExpectation); + // @ts-ignore + var i, j; - var peg$f19 = function(offset) {// @ts-ignore - return offset; };// @ts-ignore + // @ts-ignore + descriptions.sort(); - var peg$f20 = function(offset) {// @ts-ignore - return offset; };// @ts-ignore + // @ts-ignore + if (descriptions.length > 0) { + // @ts-ignore + for (i = 1, j = 1; i < descriptions.length; i++) { + // @ts-ignore + if (descriptions[i - 1] !== descriptions[i]) { + // @ts-ignore + descriptions[j] = descriptions[i]; + // @ts-ignore + j++; + } + } + // @ts-ignore + descriptions.length = j; + } - var peg$f21 = function(name) { -// @ts-ignore - return { name: name[0] + name[1].join('') }; - };// @ts-ignore + // @ts-ignore + switch (descriptions.length) { + // @ts-ignore + case 1: + // @ts-ignore + return descriptions[0]; - var peg$f22 = function(digits) {// @ts-ignore - return parseInt(digits.join(''), 10); };// @ts-ignore + // @ts-ignore + case 2: + // @ts-ignore + return descriptions[0] + ' or ' + descriptions[1]; - var peg$f23 = function(content) {// @ts-ignore - return content.join(''); };// @ts-ignore + // @ts-ignore + default: + // @ts-ignore + return ( + descriptions.slice(0, -1).join(', ') + + // @ts-ignore + ', or ' + + // @ts-ignore + descriptions[descriptions.length - 1] + ); + } + } - var peg$f24 = function(content) {// @ts-ignore - return content.join(''); };// @ts-ignore + // @ts-ignore + function describeFound(found) { + // @ts-ignore + return found ? '"' + literalEscape(found) + '"' : 'end of input'; + } - var peg$f25 = function(value) { -// @ts-ignore - return parseFloat( -// @ts-ignore - value.map(x => (Array.isArray(x) ? x.join('') : x)).join(''), + // @ts-ignore + return ( + 'Expected ' + + describeExpected(expected) + + ' but ' + + describeFound(found) + + ' found.' ); }; -// @ts-ignore - var peg$currPos = options.peg$currPos | 0; -// @ts-ignore - var peg$savedPos = peg$currPos; -// @ts-ignore - var peg$posDetailsCache = [{ line: 1, column: 1 }]; -// @ts-ignore - var peg$maxFailPos = peg$currPos; -// @ts-ignore - var peg$maxFailExpected = options.peg$maxFailExpected || []; -// @ts-ignore - var peg$silentFails = options.peg$silentFails | 0; -// @ts-ignore - var peg$result; + // @ts-ignore + function peg$parse(input, options) { + // @ts-ignore + options = options !== undefined ? options : {}; -// @ts-ignore - if (options.startRule) { -// @ts-ignore - if (!(options.startRule in peg$startRuleFunctions)) { -// @ts-ignore - throw new Error("Can't start parsing from rule \"" + options.startRule + "\"."); - } + // @ts-ignore + var peg$FAILED = {}; + // @ts-ignore + var peg$source = options.grammarSource; -// @ts-ignore - peg$startRuleFunction = peg$startRuleFunctions[options.startRule]; - } + // @ts-ignore + var peg$startRuleFunctions = { Program: peg$parseProgram }; + // @ts-ignore + var peg$startRuleFunction = peg$parseProgram; -// @ts-ignore - function text() { -// @ts-ignore - return input.substring(peg$savedPos, peg$currPos); - } + // @ts-ignore + var peg$c0 = '**'; + var peg$c1 = '%'; + var peg$c2 = '>>'; + var peg$c3 = '<<'; + var peg$c4 = '=='; + var peg$c5 = '<='; + var peg$c6 = '>='; + var peg$c7 = '!='; + var peg$c8 = '-'; + var peg$c9 = '.'; + var peg$c10 = "'"; + var peg$c11 = '"'; + var peg$c12 = 'OFFSET'; + var peg$c13 = 'OFFp'; + var peg$c14 = 'SELp'; + var peg$c15 = 'VAR'; + var peg$c16 = 'INT'; + var peg$c17 = 'REAL'; + var peg$c18 = 'STRING'; + var peg$c19 = 'APP'; + var peg$c20 = 'RECORD'; + var peg$c21 = 'SELECT'; + var peg$c22 = 'FIX'; + var peg$c23 = 'SWITCH'; + var peg$c24 = 'PRIMOP'; + var peg$c25 = 'LABEL'; + var peg$c26 = 'store'; + var peg$c27 = 'update'; + var peg$c28 = 'makeref'; + var peg$c29 = 'makerefunboxed'; + var peg$c30 = 'unboxedupdate'; + var peg$c31 = 'subscript'; + var peg$c32 = 'boxed'; + var peg$c33 = '_'; + var peg$c34 = '['; + var peg$c35 = ']'; + var peg$c36 = ','; + var peg$c37 = '='; + var peg$c38 = '('; + var peg$c39 = ')'; + var peg$c40 = '\r\n'; -// @ts-ignore - function offset() { -// @ts-ignore - return peg$savedPos; - } + var peg$r0 = /^[A-Za-z]/; + var peg$r1 = /^[0-9A-Z_a-z]/; + var peg$r2 = /^[*-+\-\/]/; + var peg$r3 = /^[\^~]/; + var peg$r4 = /^[!<>]/; + var peg$r5 = /^[0-9]/; + var peg$r6 = /^[^']/; + var peg$r7 = /^[^"]/; + var peg$r8 = /^[\t-\n ]/; -// @ts-ignore - function range() { -// @ts-ignore - return { -// @ts-ignore - source: peg$source, -// @ts-ignore - start: peg$savedPos, -// @ts-ignore - end: peg$currPos - }; - } + var peg$e0 = peg$classExpectation( + [ + ['A', 'Z'], + ['a', 'z'], + ], + false, + false, + ); + var peg$e1 = peg$classExpectation( + [['0', '9'], ['A', 'Z'], '_', ['a', 'z']], + false, + false, + ); + var peg$e2 = peg$classExpectation([['*', '+'], '-', '/'], false, false); + var peg$e3 = peg$literalExpectation('**', false); + var peg$e4 = peg$literalExpectation('%', false); + var peg$e5 = peg$literalExpectation('>>', false); + var peg$e6 = peg$literalExpectation('<<', false); + var peg$e7 = peg$classExpectation(['^', '~'], false, false); + var peg$e8 = peg$literalExpectation('==', false); + var peg$e9 = peg$literalExpectation('<=', false); + var peg$e10 = peg$literalExpectation('>=', false); + var peg$e11 = peg$literalExpectation('!=', false); + var peg$e12 = peg$classExpectation(['!', '<', '>'], false, false); + var peg$e13 = peg$literalExpectation('-', false); + var peg$e14 = peg$classExpectation([['0', '9']], false, false); + var peg$e15 = peg$literalExpectation('.', false); + var peg$e16 = peg$literalExpectation("'", false); + var peg$e17 = peg$classExpectation(["'"], true, false); + var peg$e18 = peg$literalExpectation('"', false); + var peg$e19 = peg$classExpectation(['"'], true, false); + var peg$e20 = peg$literalExpectation('OFFSET', false); + var peg$e21 = peg$literalExpectation('OFFp', false); + var peg$e22 = peg$literalExpectation('SELp', false); + var peg$e23 = peg$literalExpectation('VAR', false); + var peg$e24 = peg$literalExpectation('INT', false); + var peg$e25 = peg$literalExpectation('REAL', false); + var peg$e26 = peg$literalExpectation('STRING', false); + var peg$e27 = peg$literalExpectation('APP', false); + var peg$e28 = peg$literalExpectation('RECORD', false); + var peg$e29 = peg$literalExpectation('SELECT', false); + var peg$e30 = peg$literalExpectation('FIX', false); + var peg$e31 = peg$literalExpectation('SWITCH', false); + var peg$e32 = peg$literalExpectation('PRIMOP', false); + var peg$e33 = peg$literalExpectation('LABEL', false); + var peg$e34 = peg$literalExpectation('store', false); + var peg$e35 = peg$literalExpectation('update', false); + var peg$e36 = peg$literalExpectation('makeref', false); + var peg$e37 = peg$literalExpectation('makerefunboxed', false); + var peg$e38 = peg$literalExpectation('unboxedupdate', false); + var peg$e39 = peg$literalExpectation('subscript', false); + var peg$e40 = peg$literalExpectation('boxed', false); + var peg$e41 = peg$literalExpectation('_', false); + var peg$e42 = peg$literalExpectation('[', false); + var peg$e43 = peg$literalExpectation(']', false); + var peg$e44 = peg$literalExpectation(',', false); + var peg$e45 = peg$literalExpectation('=', false); + var peg$e46 = peg$literalExpectation('(', false); + var peg$e47 = peg$literalExpectation(')', false); + var peg$e48 = peg$classExpectation([['\t', '\n'], ' '], false, false); + var peg$e49 = peg$literalExpectation('\r\n', false); + // @ts-ignore -// @ts-ignore - function location() { -// @ts-ignore - return peg$computeLocation(peg$savedPos, peg$currPos); - } + var peg$f0 = function (exprs) { + // @ts-ignore + return exprs.filter(x => !Array.isArray(x)); + }; // @ts-ignore -// @ts-ignore - function expected(description, location) { -// @ts-ignore - location = location !== undefined -// @ts-ignore - ? location -// @ts-ignore - : peg$computeLocation(peg$savedPos, peg$currPos); + var peg$f1 = function (record, val, bind, continuation) { + // @ts-ignore + return { select: { record, val, bind, continuation } }; + }; // @ts-ignore -// @ts-ignore - throw peg$buildStructuredError( -// @ts-ignore - [peg$otherExpectation(description)], -// @ts-ignore - input.substring(peg$savedPos, peg$currPos), -// @ts-ignore - location - ); - } + var peg$f2 = function (index, val, bind, continuation) { + // @ts-ignore + return { offset: { index, val, bind, continuation } }; + }; // @ts-ignore -// @ts-ignore - function error(message, location) { -// @ts-ignore - location = location !== undefined -// @ts-ignore - ? location -// @ts-ignore - : peg$computeLocation(peg$savedPos, peg$currPos); + var peg$f3 = function (identifiers, lastIdent) { + // @ts-ignore + return identifiers.length || lastIdent + ? // @ts-ignore + [...identifiers.map(x => x[0]), lastIdent] + : []; + }; // @ts-ignore -// @ts-ignore - throw peg$buildSimpleError(message, location); - } + var peg$f4 = function (values, lastValue) { + // @ts-ignore + return values.length || lastValue + ? // @ts-ignore + [...values.map(x => x[0]), lastValue] + : []; + }; // @ts-ignore -// @ts-ignore - function peg$literalExpectation(text, ignoreCase) { -// @ts-ignore - return { type: "literal", text: text, ignoreCase: ignoreCase }; - } + var peg$f5 = function (switchIndex, continuations) { + // @ts-ignore + return { switch: { switchIndex, continuations } }; + }; // @ts-ignore -// @ts-ignore - function peg$classExpectation(parts, inverted, ignoreCase) { -// @ts-ignore - return { type: "class", parts: parts, inverted: inverted, ignoreCase: ignoreCase }; - } + var peg$f6 = function (fn, args) { + // @ts-ignore + return { application: { fn, args } }; + }; // @ts-ignore -// @ts-ignore - function peg$anyExpectation() { -// @ts-ignore - return { type: "any" }; - } + var peg$f7 = function (bindings, lastBinding) { + // @ts-ignore + return bindings.length || lastBinding + ? // @ts-ignore + [...bindings.map(x => x[0]), lastBinding] + : []; + }; // @ts-ignore -// @ts-ignore - function peg$endExpectation() { -// @ts-ignore - return { type: "end" }; - } + var peg$f8 = function (fixBindings, continuation) { + // @ts-ignore + return { fix: { fixBindings, continuation } }; + }; // @ts-ignore -// @ts-ignore - function peg$otherExpectation(description) { -// @ts-ignore - return { type: "other", description: description }; - } + var peg$f9 = function (continuations, lastContinuation) { + // @ts-ignore + return lastContinuation || continuations.length + ? // @ts-ignore + [...continuations.map(x => x[0]), lastContinuation] + : []; + }; // @ts-ignore -// @ts-ignore - function peg$computePosDetails(pos) { -// @ts-ignore - var details = peg$posDetailsCache[pos]; -// @ts-ignore - var p; + var peg$f10 = function (opr, operands, resultBindings, continuations) { + // @ts-ignore + return { + // @ts-ignore + primitiveOperation: { opr, operands, resultBindings, continuations }, + }; + }; // @ts-ignore -// @ts-ignore - if (details) { -// @ts-ignore - return details; -// @ts-ignore - } else { -// @ts-ignore - if (pos >= peg$posDetailsCache.length) { -// @ts-ignore - p = peg$posDetailsCache.length - 1; -// @ts-ignore - } else { -// @ts-ignore - p = pos; -// @ts-ignore - while (!peg$posDetailsCache[--p]) {} - } + var peg$f11 = function (variable, offset) { + // @ts-ignore + return { variable, offset }; + }; // @ts-ignore -// @ts-ignore - details = peg$posDetailsCache[p]; -// @ts-ignore - details = { -// @ts-ignore - line: details.line, -// @ts-ignore - column: details.column + var peg$f12 = function (records, lastRecord) { + // @ts-ignore + return records.length || lastRecord + ? // @ts-ignore + [...records.map(x => x[0]), lastRecord] + : []; + }; // @ts-ignore + + var peg$f13 = function (records, address, body) { + // @ts-ignore + return { + // @ts-ignore + record: { + // @ts-ignore + records, + // @ts-ignore + address, + // @ts-ignore + body, + }, + }; + }; // @ts-ignore + + var peg$f14 = function (ident) { + // @ts-ignore + return ident; + }; // @ts-ignore + + var peg$f15 = function (ident) { + // @ts-ignore + return ident; + }; // @ts-ignore + + var peg$f16 = function (int) { + // @ts-ignore + return int; + }; // @ts-ignore + + var peg$f17 = function (real) { + // @ts-ignore + return real; + }; // @ts-ignore + + var peg$f18 = function (string) { + // @ts-ignore + return string; + }; // @ts-ignore + + var peg$f19 = function (offset) { + // @ts-ignore + return offset; + }; // @ts-ignore + + var peg$f20 = function (offset) { + // @ts-ignore + return offset; + }; // @ts-ignore + + var peg$f21 = function (name) { + // @ts-ignore + return { name: name[0] + name[1].join('') }; + }; // @ts-ignore + + var peg$f22 = function (digits) { + // @ts-ignore + return { int: parseInt(digits.join(''), 10) }; + }; // @ts-ignore + + var peg$f23 = function (content) { + // @ts-ignore + return content.join(''); + }; // @ts-ignore + + var peg$f24 = function (content) { + // @ts-ignore + return content.join(''); + }; // @ts-ignore + + var peg$f25 = function (value) { + // @ts-ignore + return { + real: parseFloat( + // @ts-ignore + value.map(x => (Array.isArray(x) ? x.join('') : x)).join(''), + ), + }; }; + // @ts-ignore + var peg$currPos = options.peg$currPos | 0; + // @ts-ignore + var peg$savedPos = peg$currPos; + // @ts-ignore + var peg$posDetailsCache = [{ line: 1, column: 1 }]; + // @ts-ignore + var peg$maxFailPos = peg$currPos; + // @ts-ignore + var peg$maxFailExpected = options.peg$maxFailExpected || []; + // @ts-ignore + var peg$silentFails = options.peg$silentFails | 0; -// @ts-ignore - while (p < pos) { -// @ts-ignore - if (input.charCodeAt(p) === 10) { -// @ts-ignore - details.line++; -// @ts-ignore - details.column = 1; -// @ts-ignore - } else { -// @ts-ignore - details.column++; + // @ts-ignore + var peg$result; + + // @ts-ignore + if (options.startRule) { + // @ts-ignore + if (!(options.startRule in peg$startRuleFunctions)) { + // @ts-ignore + throw new Error( + 'Can\'t start parsing from rule "' + options.startRule + '".', + ); } -// @ts-ignore - p++; + // @ts-ignore + peg$startRuleFunction = peg$startRuleFunctions[options.startRule]; } -// @ts-ignore - peg$posDetailsCache[pos] = details; - -// @ts-ignore - return details; - } - } - -// @ts-ignore - function peg$computeLocation(startPos, endPos, offset) { -// @ts-ignore - var startPosDetails = peg$computePosDetails(startPos); -// @ts-ignore - var endPosDetails = peg$computePosDetails(endPos); - -// @ts-ignore - var res = { -// @ts-ignore - source: peg$source, -// @ts-ignore - start: { -// @ts-ignore - offset: startPos, -// @ts-ignore - line: startPosDetails.line, -// @ts-ignore - column: startPosDetails.column - }, -// @ts-ignore - end: { -// @ts-ignore - offset: endPos, -// @ts-ignore - line: endPosDetails.line, -// @ts-ignore - column: endPosDetails.column + // @ts-ignore + function text() { + // @ts-ignore + return input.substring(peg$savedPos, peg$currPos); } - }; -// @ts-ignore - if (offset && peg$source && (typeof peg$source.offset === "function")) { -// @ts-ignore - res.start = peg$source.offset(res.start); -// @ts-ignore - res.end = peg$source.offset(res.end); - } -// @ts-ignore - return res; - } -// @ts-ignore - function peg$fail(expected) { -// @ts-ignore - if (peg$currPos < peg$maxFailPos) { return; } - -// @ts-ignore - if (peg$currPos > peg$maxFailPos) { -// @ts-ignore - peg$maxFailPos = peg$currPos; -// @ts-ignore - peg$maxFailExpected = []; - } - -// @ts-ignore - peg$maxFailExpected.push(expected); - } - -// @ts-ignore - function peg$buildSimpleError(message, location) { -// @ts-ignore - return new peg$SyntaxError(message, null, null, location); - } - -// @ts-ignore - function peg$buildStructuredError(expected, found, location) { -// @ts-ignore - return new peg$SyntaxError( -// @ts-ignore - peg$SyntaxError.buildMessage(expected, found), -// @ts-ignore - expected, -// @ts-ignore - found, -// @ts-ignore - location - ); - } - -// @ts-ignore - function // @ts-ignore -peg$parseProgram() { -// @ts-ignore - var s0, s1, s2; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = []; -// @ts-ignore - s2 = peg$parseContinuationExpression(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); - } -// @ts-ignore - while (s2 !== peg$FAILED) { -// @ts-ignore - s1.push(s2); -// @ts-ignore - s2 = peg$parseContinuationExpression(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); + // @ts-ignore + function offset() { + // @ts-ignore + return peg$savedPos; } - } -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s1 = peg$f0(s1); -// @ts-ignore - s0 = s1; -// @ts-ignore - return s0; - } + // @ts-ignore + function range() { + // @ts-ignore + return { + // @ts-ignore + source: peg$source, + // @ts-ignore + start: peg$savedPos, + // @ts-ignore + end: peg$currPos, + }; + } -// @ts-ignore - function // @ts-ignore -peg$parseContinuationExpression() { -// @ts-ignore - var s0; + // @ts-ignore + function location() { + // @ts-ignore + return peg$computeLocation(peg$savedPos, peg$currPos); + } -// @ts-ignore - s0 = peg$parseRecordExpression(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseSelectExpression(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseOffsetExpression(); -// @ts-ignore + // @ts-ignore + function expected(description, location) { + // @ts-ignore + location = + location !== undefined + ? // @ts-ignore + location + : // @ts-ignore + peg$computeLocation(peg$savedPos, peg$currPos); + + // @ts-ignore + throw peg$buildStructuredError( + // @ts-ignore + [peg$otherExpectation(description)], + // @ts-ignore + input.substring(peg$savedPos, peg$currPos), + // @ts-ignore + location, + ); + } + + // @ts-ignore + function error(message, location) { + // @ts-ignore + location = + location !== undefined + ? // @ts-ignore + location + : // @ts-ignore + peg$computeLocation(peg$savedPos, peg$currPos); + + // @ts-ignore + throw peg$buildSimpleError(message, location); + } + + // @ts-ignore + function peg$literalExpectation(text, ignoreCase) { + // @ts-ignore + return { type: 'literal', text: text, ignoreCase: ignoreCase }; + } + + // @ts-ignore + function peg$classExpectation(parts, inverted, ignoreCase) { + // @ts-ignore + return { + type: 'class', + parts: parts, + inverted: inverted, + ignoreCase: ignoreCase, + }; + } + + // @ts-ignore + function peg$anyExpectation() { + // @ts-ignore + return { type: 'any' }; + } + + // @ts-ignore + function peg$endExpectation() { + // @ts-ignore + return { type: 'end' }; + } + + // @ts-ignore + function peg$otherExpectation(description) { + // @ts-ignore + return { type: 'other', description: description }; + } + + // @ts-ignore + function peg$computePosDetails(pos) { + // @ts-ignore + var details = peg$posDetailsCache[pos]; + // @ts-ignore + var p; + + // @ts-ignore + if (details) { + // @ts-ignore + return details; + // @ts-ignore + } else { + // @ts-ignore + if (pos >= peg$posDetailsCache.length) { + // @ts-ignore + p = peg$posDetailsCache.length - 1; + // @ts-ignore + } else { + // @ts-ignore + p = pos; + // @ts-ignore + while (!peg$posDetailsCache[--p]) {} + } + + // @ts-ignore + details = peg$posDetailsCache[p]; + // @ts-ignore + details = { + // @ts-ignore + line: details.line, + // @ts-ignore + column: details.column, + }; + + // @ts-ignore + while (p < pos) { + // @ts-ignore + if (input.charCodeAt(p) === 10) { + // @ts-ignore + details.line++; + // @ts-ignore + details.column = 1; + // @ts-ignore + } else { + // @ts-ignore + details.column++; + } + + // @ts-ignore + p++; + } + + // @ts-ignore + peg$posDetailsCache[pos] = details; + + // @ts-ignore + return details; + } + } + + // @ts-ignore + function peg$computeLocation(startPos, endPos, offset) { + // @ts-ignore + var startPosDetails = peg$computePosDetails(startPos); + // @ts-ignore + var endPosDetails = peg$computePosDetails(endPos); + + // @ts-ignore + var res = { + // @ts-ignore + source: peg$source, + // @ts-ignore + start: { + // @ts-ignore + offset: startPos, + // @ts-ignore + line: startPosDetails.line, + // @ts-ignore + column: startPosDetails.column, + }, + // @ts-ignore + end: { + // @ts-ignore + offset: endPos, + // @ts-ignore + line: endPosDetails.line, + // @ts-ignore + column: endPosDetails.column, + }, + }; + // @ts-ignore + if (offset && peg$source && typeof peg$source.offset === 'function') { + // @ts-ignore + res.start = peg$source.offset(res.start); + // @ts-ignore + res.end = peg$source.offset(res.end); + } + // @ts-ignore + return res; + } + + // @ts-ignore + function peg$fail(expected) { + // @ts-ignore + if (peg$currPos < peg$maxFailPos) { + return; + } + + // @ts-ignore + if (peg$currPos > peg$maxFailPos) { + // @ts-ignore + peg$maxFailPos = peg$currPos; + // @ts-ignore + peg$maxFailExpected = []; + } + + // @ts-ignore + peg$maxFailExpected.push(expected); + } + + // @ts-ignore + function peg$buildSimpleError(message, location) { + // @ts-ignore + return new peg$SyntaxError(message, null, null, location); + } + + // @ts-ignore + function peg$buildStructuredError(expected, found, location) { + // @ts-ignore + return new peg$SyntaxError( + // @ts-ignore + peg$SyntaxError.buildMessage(expected, found), + // @ts-ignore + expected, + // @ts-ignore + found, + // @ts-ignore + location, + ); + } + + // @ts-ignore + function // @ts-ignore + peg$parseProgram() { + // @ts-ignore + var s0, s1, s2; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = []; + // @ts-ignore + s2 = peg$parseContinuationExpression(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + } + // @ts-ignore + while (s2 !== peg$FAILED) { + // @ts-ignore + s1.push(s2); + // @ts-ignore + s2 = peg$parseContinuationExpression(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + } + } + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s1 = peg$f0(s1); + // @ts-ignore + s0 = s1; + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseContinuationExpression() { + // @ts-ignore + var s0; + + // @ts-ignore + s0 = peg$parseRecordExpression(); + // @ts-ignore if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseApplicationExpression(); -// @ts-ignore + // @ts-ignore + s0 = peg$parseSelectExpression(); + // @ts-ignore if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseFixExpression(); -// @ts-ignore + // @ts-ignore + s0 = peg$parseOffsetExpression(); + // @ts-ignore if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseSwitchExpression(); -// @ts-ignore + // @ts-ignore + s0 = peg$parseApplicationExpression(); + // @ts-ignore if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parsePrimitiveOperationExpression(); - } - } - } - } - } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseSelectExpression() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13, s14, s15, s16, s17, s18, s19; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseSELECT(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = peg$parseLPAREN(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseInteger(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s9 = peg$parseValue(); -// @ts-ignore - if (s9 !== peg$FAILED) { -// @ts-ignore - s10 = peg$parse_(); -// @ts-ignore - if (s10 === peg$FAILED) { -// @ts-ignore - s10 = null; - } -// @ts-ignore - s11 = peg$parseCOMMA(); -// @ts-ignore - if (s11 !== peg$FAILED) { -// @ts-ignore - s12 = peg$parse_(); -// @ts-ignore - if (s12 === peg$FAILED) { -// @ts-ignore - s12 = null; - } -// @ts-ignore - s13 = peg$parseIdentifier(); -// @ts-ignore - if (s13 !== peg$FAILED) { -// @ts-ignore - s14 = peg$parse_(); -// @ts-ignore - if (s14 === peg$FAILED) { -// @ts-ignore - s14 = null; + // @ts-ignore + s0 = peg$parseFixExpression(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseSwitchExpression(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parsePrimitiveOperationExpression(); } -// @ts-ignore - s15 = peg$parseCOMMA(); -// @ts-ignore - if (s15 !== peg$FAILED) { -// @ts-ignore - s16 = peg$parse_(); -// @ts-ignore - if (s16 === peg$FAILED) { -// @ts-ignore - s16 = null; + } + } + } + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSelectExpression() { + // @ts-ignore + var s0, + s1, + s2, + s3, + s4, + s5, + s6, + s7, + s8, + s9, + s10, + s11, + s12, + s13, + s14, + s15, + s16, + s17, + s18, + s19; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseSELECT(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = peg$parseLPAREN(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseInteger(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s9 = peg$parseValue(); + // @ts-ignore + if (s9 !== peg$FAILED) { + // @ts-ignore + s10 = peg$parse_(); + // @ts-ignore + if (s10 === peg$FAILED) { + // @ts-ignore + s10 = null; + } + // @ts-ignore + s11 = peg$parseCOMMA(); + // @ts-ignore + if (s11 !== peg$FAILED) { + // @ts-ignore + s12 = peg$parse_(); + // @ts-ignore + if (s12 === peg$FAILED) { + // @ts-ignore + s12 = null; } -// @ts-ignore - s17 = peg$parseContinuationExpression(); -// @ts-ignore - if (s17 !== peg$FAILED) { -// @ts-ignore - s18 = peg$parse_(); -// @ts-ignore - if (s18 === peg$FAILED) { -// @ts-ignore - s18 = null; + // @ts-ignore + s13 = peg$parseIdentifier(); + // @ts-ignore + if (s13 !== peg$FAILED) { + // @ts-ignore + s14 = peg$parse_(); + // @ts-ignore + if (s14 === peg$FAILED) { + // @ts-ignore + s14 = null; } -// @ts-ignore - s19 = peg$parseRPAREN(); -// @ts-ignore - if (s19 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f1(s5, s9, s13, s17); -// @ts-ignore + // @ts-ignore + s15 = peg$parseCOMMA(); + // @ts-ignore + if (s15 !== peg$FAILED) { + // @ts-ignore + s16 = peg$parse_(); + // @ts-ignore + if (s16 === peg$FAILED) { + // @ts-ignore + s16 = null; + } + // @ts-ignore + s17 = peg$parseContinuationExpression(); + // @ts-ignore + if (s17 !== peg$FAILED) { + // @ts-ignore + s18 = peg$parse_(); + // @ts-ignore + if (s18 === peg$FAILED) { + // @ts-ignore + s18 = null; + } + // @ts-ignore + s19 = peg$parseRPAREN(); + // @ts-ignore + if (s19 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f1(s5, s9, s13, s17); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseOffsetExpression() { + // @ts-ignore + var s0, + s1, + s2, + s3, + s4, + s5, + s6, + s7, + s8, + s9, + s10, + s11, + s12, + s13, + s14, + s15, + s16, + s17; -// @ts-ignore - function // @ts-ignore -peg$parseOffsetExpression() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13, s14, s15, s16, s17; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseOFFSET(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = peg$parseLPAREN(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseInteger(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseOFFSET(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; + // @ts-ignore + s3 = peg$parseLPAREN(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; } -// @ts-ignore - s9 = peg$parseValue(); -// @ts-ignore - if (s9 !== peg$FAILED) { -// @ts-ignore - s10 = peg$parse_(); -// @ts-ignore - if (s10 === peg$FAILED) { -// @ts-ignore - s10 = null; + // @ts-ignore + s5 = peg$parseInteger(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; } -// @ts-ignore - s11 = peg$parseCOMMA(); -// @ts-ignore - if (s11 !== peg$FAILED) { -// @ts-ignore - s12 = peg$parse_(); -// @ts-ignore - if (s12 === peg$FAILED) { -// @ts-ignore - s12 = null; + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; } -// @ts-ignore - s13 = peg$parseIdentifier(); -// @ts-ignore - if (s13 !== peg$FAILED) { -// @ts-ignore - s14 = peg$parse_(); -// @ts-ignore - if (s14 === peg$FAILED) { -// @ts-ignore - s14 = null; + // @ts-ignore + s9 = peg$parseValue(); + // @ts-ignore + if (s9 !== peg$FAILED) { + // @ts-ignore + s10 = peg$parse_(); + // @ts-ignore + if (s10 === peg$FAILED) { + // @ts-ignore + s10 = null; } -// @ts-ignore - s15 = peg$parseContinuationExpression(); -// @ts-ignore - if (s15 !== peg$FAILED) { -// @ts-ignore - s16 = peg$parse_(); -// @ts-ignore - if (s16 === peg$FAILED) { -// @ts-ignore - s16 = null; + // @ts-ignore + s11 = peg$parseCOMMA(); + // @ts-ignore + if (s11 !== peg$FAILED) { + // @ts-ignore + s12 = peg$parse_(); + // @ts-ignore + if (s12 === peg$FAILED) { + // @ts-ignore + s12 = null; } -// @ts-ignore - s17 = peg$parseRPAREN(); -// @ts-ignore - if (s17 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f2(s5, s9, s13, s15); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseIdentifierList() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseLBRACKET(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = []; -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseIdentifier(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - while (s4 !== peg$FAILED) { -// @ts-ignore - s3.push(s4); -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseIdentifier(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } - } -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseIdentifier(); -// @ts-ignore - if (s5 === peg$FAILED) { -// @ts-ignore - s5 = null; - } -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseRBRACKET(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f3(s3, s5); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseValueList() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseLBRACKET(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = []; -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseValue(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - while (s4 !== peg$FAILED) { -// @ts-ignore - s3.push(s4); -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseValue(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } - } -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseValue(); -// @ts-ignore - if (s5 === peg$FAILED) { -// @ts-ignore - s5 = null; - } -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseRBRACKET(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f4(s3, s5); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseSwitchExpression() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseSWITCH(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = peg$parseLPAREN(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseValue(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s9 = peg$parseContinuationList(); -// @ts-ignore - if (s9 !== peg$FAILED) { -// @ts-ignore - s10 = peg$parse_(); -// @ts-ignore - if (s10 === peg$FAILED) { -// @ts-ignore - s10 = null; - } -// @ts-ignore - s11 = peg$parseRPAREN(); -// @ts-ignore - if (s11 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f5(s5, s9); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseApplicationExpression() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseAPP(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = peg$parseLPAREN(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseValue(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s9 = peg$parseValueList(); -// @ts-ignore - if (s9 !== peg$FAILED) { -// @ts-ignore - s10 = peg$parse_(); -// @ts-ignore - if (s10 === peg$FAILED) { -// @ts-ignore - s10 = null; - } -// @ts-ignore - s11 = peg$parseRPAREN(); -// @ts-ignore - if (s11 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f6(s5, s9); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseFixBinding() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseLPAREN(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = peg$parseIdentifier(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseCOMMA(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseIdentifierList(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s9 = peg$parseCOMMA(); -// @ts-ignore - if (s9 !== peg$FAILED) { -// @ts-ignore - s10 = peg$parse_(); -// @ts-ignore - if (s10 === peg$FAILED) { -// @ts-ignore - s10 = null; - } -// @ts-ignore - s11 = peg$parseContinuationExpression(); -// @ts-ignore - if (s11 !== peg$FAILED) { -// @ts-ignore - s12 = peg$parse_(); -// @ts-ignore - if (s12 === peg$FAILED) { -// @ts-ignore - s12 = null; - } -// @ts-ignore - s13 = peg$parseRPAREN(); -// @ts-ignore - if (s13 !== peg$FAILED) { -// @ts-ignore - s1 = [s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13]; -// @ts-ignore - s0 = s1; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseFixBindingList() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseLBRACKET(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = []; -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseFixBinding(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - while (s4 !== peg$FAILED) { -// @ts-ignore - s3.push(s4); -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseFixBinding(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } - } -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseFixBinding(); -// @ts-ignore - if (s5 === peg$FAILED) { -// @ts-ignore - s5 = null; - } -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseRBRACKET(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f7(s3, s5); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseFixExpression() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseFIX(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = peg$parseLPAREN(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseFixBindingList(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s9 = peg$parseContinuationExpression(); -// @ts-ignore - if (s9 !== peg$FAILED) { -// @ts-ignore - s10 = peg$parse_(); -// @ts-ignore - if (s10 === peg$FAILED) { -// @ts-ignore - s10 = null; - } -// @ts-ignore - s11 = peg$parseRPAREN(); -// @ts-ignore - if (s11 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f8(s5, s9); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseContinuationList() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseLBRACKET(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = []; -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseContinuationExpression(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - while (s4 !== peg$FAILED) { -// @ts-ignore - s3.push(s4); -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseContinuationExpression(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } - } -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseContinuationExpression(); -// @ts-ignore - if (s5 === peg$FAILED) { -// @ts-ignore - s5 = null; - } -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseRBRACKET(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f9(s3, s5); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parsePrimitiveOperationExpression() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13, s14, s15, s16, s17, s18, s19; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parsePRIMOP(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = peg$parseLPAREN(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parsePrimitiveOperation(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s9 = peg$parseValueList(); -// @ts-ignore - if (s9 !== peg$FAILED) { -// @ts-ignore - s10 = peg$parse_(); -// @ts-ignore - if (s10 === peg$FAILED) { -// @ts-ignore - s10 = null; - } -// @ts-ignore - s11 = peg$parseCOMMA(); -// @ts-ignore - if (s11 !== peg$FAILED) { -// @ts-ignore - s12 = peg$parse_(); -// @ts-ignore - if (s12 === peg$FAILED) { -// @ts-ignore - s12 = null; - } -// @ts-ignore - s13 = peg$parseIdentifierList(); -// @ts-ignore - if (s13 !== peg$FAILED) { -// @ts-ignore - s14 = peg$parse_(); -// @ts-ignore - if (s14 === peg$FAILED) { -// @ts-ignore - s14 = null; - } -// @ts-ignore - s15 = peg$parseCOMMA(); -// @ts-ignore - if (s15 !== peg$FAILED) { -// @ts-ignore - s16 = peg$parse_(); -// @ts-ignore - if (s16 === peg$FAILED) { -// @ts-ignore - s16 = null; - } -// @ts-ignore - s17 = peg$parseContinuationList(); -// @ts-ignore - if (s17 !== peg$FAILED) { -// @ts-ignore - s18 = peg$parse_(); -// @ts-ignore - if (s18 === peg$FAILED) { -// @ts-ignore - s18 = null; + // @ts-ignore + s13 = peg$parseIdentifier(); + // @ts-ignore + if (s13 !== peg$FAILED) { + // @ts-ignore + s14 = peg$parse_(); + // @ts-ignore + if (s14 === peg$FAILED) { + // @ts-ignore + s14 = null; } -// @ts-ignore - s19 = peg$parseRPAREN(); -// @ts-ignore - if (s19 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f10(s5, s9, s13, s17); -// @ts-ignore + // @ts-ignore + s15 = peg$parseContinuationExpression(); + // @ts-ignore + if (s15 !== peg$FAILED) { + // @ts-ignore + s16 = peg$parse_(); + // @ts-ignore + if (s16 === peg$FAILED) { + // @ts-ignore + s16 = null; + } + // @ts-ignore + s17 = peg$parseRPAREN(); + // @ts-ignore + if (s17 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f2(s5, s9, s13, s15); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseIdentifierList() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8; -// @ts-ignore - function // @ts-ignore -peg$parseRecordExpressionTuple() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseLPAREN(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = peg$parseVarStatement(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseCOMMA(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseLBRACKET(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; } -// @ts-ignore - s7 = peg$parseOffsetStatement(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; + // @ts-ignore + s3 = []; + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseIdentifier(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; } -// @ts-ignore - s9 = peg$parseRPAREN(); -// @ts-ignore - if (s9 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f11(s3, s7); -// @ts-ignore + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseRecordExpressionTupleList() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseLBRACKET(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = []; -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseRecordExpressionTuple(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } -// @ts-ignore - while (s4 !== peg$FAILED) { -// @ts-ignore - s3.push(s4); -// @ts-ignore - s4 = peg$currPos; -// @ts-ignore - s5 = peg$parseRecordExpressionTuple(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; - } -// @ts-ignore - s5 = [s5, s6, s7, s8]; -// @ts-ignore - s4 = s5; -// @ts-ignore - } else { -// @ts-ignore + // @ts-ignore peg$currPos = s4; -// @ts-ignore + // @ts-ignore s4 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s4; -// @ts-ignore - s4 = peg$FAILED; - } - } -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseRecordExpressionTuple(); -// @ts-ignore - if (s5 === peg$FAILED) { -// @ts-ignore - s5 = null; - } -// @ts-ignore - s6 = peg$parse_(); -// @ts-ignore - if (s6 === peg$FAILED) { -// @ts-ignore - s6 = null; - } -// @ts-ignore - s7 = peg$parseRBRACKET(); -// @ts-ignore - if (s7 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f12(s3, s5); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseRecordExpression() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13, s14, s15; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseRECORD(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = peg$parseLPAREN(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - s4 = peg$parse_(); -// @ts-ignore - if (s4 === peg$FAILED) { -// @ts-ignore - s4 = null; - } -// @ts-ignore - s5 = peg$parseRecordExpressionTupleList(); -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore + // @ts-ignore + while (s4 !== peg$FAILED) { + // @ts-ignore + s3.push(s4); + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseIdentifier(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + } + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseIdentifier(); + // @ts-ignore + if (s5 === peg$FAILED) { + // @ts-ignore + s5 = null; + } + // @ts-ignore s6 = peg$parse_(); -// @ts-ignore + // @ts-ignore if (s6 === peg$FAILED) { -// @ts-ignore + // @ts-ignore s6 = null; } -// @ts-ignore - s7 = peg$parseCOMMA(); -// @ts-ignore + // @ts-ignore + s7 = peg$parseRBRACKET(); + // @ts-ignore if (s7 !== peg$FAILED) { -// @ts-ignore - s8 = peg$parse_(); -// @ts-ignore - if (s8 === peg$FAILED) { -// @ts-ignore - s8 = null; + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f3(s3, s5); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseValueList() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseLBRACKET(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = []; + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseValue(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; } -// @ts-ignore - s9 = peg$parseLiteral(); -// @ts-ignore - if (s9 !== peg$FAILED) { -// @ts-ignore - s10 = peg$parse_(); -// @ts-ignore - if (s10 === peg$FAILED) { -// @ts-ignore - s10 = null; + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; } -// @ts-ignore - s11 = peg$parseCOMMA(); -// @ts-ignore - if (s11 !== peg$FAILED) { -// @ts-ignore - s12 = peg$parse_(); -// @ts-ignore - if (s12 === peg$FAILED) { -// @ts-ignore - s12 = null; + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + while (s4 !== peg$FAILED) { + // @ts-ignore + s3.push(s4); + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseValue(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; } -// @ts-ignore - s13 = peg$parseContinuationExpression(); -// @ts-ignore - if (s13 !== peg$FAILED) { -// @ts-ignore - s14 = peg$parse_(); -// @ts-ignore - if (s14 === peg$FAILED) { -// @ts-ignore - s14 = null; + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + } + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseValue(); + // @ts-ignore + if (s5 === peg$FAILED) { + // @ts-ignore + s5 = null; + } + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseRBRACKET(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f4(s3, s5); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSwitchExpression() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseSWITCH(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = peg$parseLPAREN(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseValue(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s9 = peg$parseContinuationList(); + // @ts-ignore + if (s9 !== peg$FAILED) { + // @ts-ignore + s10 = peg$parse_(); + // @ts-ignore + if (s10 === peg$FAILED) { + // @ts-ignore + s10 = null; } -// @ts-ignore - s15 = peg$parseRPAREN(); -// @ts-ignore - if (s15 !== peg$FAILED) { -// @ts-ignore + // @ts-ignore + s11 = peg$parseRPAREN(); + // @ts-ignore + if (s11 !== peg$FAILED) { + // @ts-ignore peg$savedPos = s0; -// @ts-ignore - s0 = peg$f13(s5, s9, s13); -// @ts-ignore + // @ts-ignore + s0 = peg$f5(s5, s9); + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseApplicationExpression() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11; -// @ts-ignore - function // @ts-ignore -peg$parseValue() { -// @ts-ignore - var s0; - -// @ts-ignore - s0 = peg$parseVarStatement(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseLabelStatement(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseIntStatement(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseRealStatement(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseStringStatement(); + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseAPP(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; } - } - } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseVarStatement() { -// @ts-ignore - var s0, s1, s2, s3; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseVAR(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - s3 = peg$parseIdentifier(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f14(s3); -// @ts-ignore + // @ts-ignore + s3 = peg$parseLPAREN(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseValue(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s9 = peg$parseValueList(); + // @ts-ignore + if (s9 !== peg$FAILED) { + // @ts-ignore + s10 = peg$parse_(); + // @ts-ignore + if (s10 === peg$FAILED) { + // @ts-ignore + s10 = null; + } + // @ts-ignore + s11 = peg$parseRPAREN(); + // @ts-ignore + if (s11 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f6(s5, s9); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseFixBinding() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11, s12, s13; -// @ts-ignore - function // @ts-ignore -peg$parseLabelStatement() { -// @ts-ignore - var s0, s1, s2, s3; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseLABEL(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - s3 = peg$parseIdentifier(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f15(s3); -// @ts-ignore + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseLPAREN(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = peg$parseIdentifier(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseCOMMA(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseIdentifierList(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s9 = peg$parseCOMMA(); + // @ts-ignore + if (s9 !== peg$FAILED) { + // @ts-ignore + s10 = peg$parse_(); + // @ts-ignore + if (s10 === peg$FAILED) { + // @ts-ignore + s10 = null; + } + // @ts-ignore + s11 = peg$parseContinuationExpression(); + // @ts-ignore + if (s11 !== peg$FAILED) { + // @ts-ignore + s12 = peg$parse_(); + // @ts-ignore + if (s12 === peg$FAILED) { + // @ts-ignore + s12 = null; + } + // @ts-ignore + s13 = peg$parseRPAREN(); + // @ts-ignore + if (s13 !== peg$FAILED) { + // @ts-ignore + s1 = [ + s1, + s2, + s3, + s4, + s5, + s6, + s7, + s8, + s9, + s10, + s11, + s12, + s13, + ]; + // @ts-ignore + s0 = s1; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseFixBindingList() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8; -// @ts-ignore - function // @ts-ignore -peg$parseIntStatement() { -// @ts-ignore - var s0, s1, s2, s3; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseINT(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - s3 = peg$parseInteger(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f16(s3); -// @ts-ignore + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseLBRACKET(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = []; + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseFixBinding(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + while (s4 !== peg$FAILED) { + // @ts-ignore + s3.push(s4); + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseFixBinding(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + } + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseFixBinding(); + // @ts-ignore + if (s5 === peg$FAILED) { + // @ts-ignore + s5 = null; + } + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseRBRACKET(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f7(s3, s5); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseFixExpression() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11; -// @ts-ignore - function // @ts-ignore -peg$parseRealStatement() { -// @ts-ignore - var s0, s1, s2, s3; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseREAL(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - s3 = peg$parseReal(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f17(s3); -// @ts-ignore + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseFIX(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = peg$parseLPAREN(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseFixBindingList(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s9 = peg$parseContinuationExpression(); + // @ts-ignore + if (s9 !== peg$FAILED) { + // @ts-ignore + s10 = peg$parse_(); + // @ts-ignore + if (s10 === peg$FAILED) { + // @ts-ignore + s10 = null; + } + // @ts-ignore + s11 = peg$parseRPAREN(); + // @ts-ignore + if (s11 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f8(s5, s9); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseContinuationList() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8; -// @ts-ignore - function // @ts-ignore -peg$parseStringStatement() { -// @ts-ignore - var s0, s1, s2, s3; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseSTRING(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - s3 = peg$parseQuotedString(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f18(s3); -// @ts-ignore + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseLBRACKET(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = []; + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseContinuationExpression(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + while (s4 !== peg$FAILED) { + // @ts-ignore + s3.push(s4); + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseContinuationExpression(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + } + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseContinuationExpression(); + // @ts-ignore + if (s5 === peg$FAILED) { + // @ts-ignore + s5 = null; + } + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseRBRACKET(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f9(s3, s5); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parsePrimitiveOperationExpression() { + // @ts-ignore + var s0, + s1, + s2, + s3, + s4, + s5, + s6, + s7, + s8, + s9, + s10, + s11, + s12, + s13, + s14, + s15, + s16, + s17, + s18, + s19; -// @ts-ignore - function // @ts-ignore -peg$parseAccessStatement() { -// @ts-ignore - var s0; - -// @ts-ignore - s0 = peg$parseOffsetStatement(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseSelectStatement(); - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseOffsetStatement() { -// @ts-ignore - var s0, s1, s2, s3; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseOFFP(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - s3 = peg$parseInteger(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f19(s3); -// @ts-ignore + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parsePRIMOP(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = peg$parseLPAREN(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parsePrimitiveOperation(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s9 = peg$parseValueList(); + // @ts-ignore + if (s9 !== peg$FAILED) { + // @ts-ignore + s10 = peg$parse_(); + // @ts-ignore + if (s10 === peg$FAILED) { + // @ts-ignore + s10 = null; + } + // @ts-ignore + s11 = peg$parseCOMMA(); + // @ts-ignore + if (s11 !== peg$FAILED) { + // @ts-ignore + s12 = peg$parse_(); + // @ts-ignore + if (s12 === peg$FAILED) { + // @ts-ignore + s12 = null; + } + // @ts-ignore + s13 = peg$parseIdentifierList(); + // @ts-ignore + if (s13 !== peg$FAILED) { + // @ts-ignore + s14 = peg$parse_(); + // @ts-ignore + if (s14 === peg$FAILED) { + // @ts-ignore + s14 = null; + } + // @ts-ignore + s15 = peg$parseCOMMA(); + // @ts-ignore + if (s15 !== peg$FAILED) { + // @ts-ignore + s16 = peg$parse_(); + // @ts-ignore + if (s16 === peg$FAILED) { + // @ts-ignore + s16 = null; + } + // @ts-ignore + s17 = peg$parseContinuationList(); + // @ts-ignore + if (s17 !== peg$FAILED) { + // @ts-ignore + s18 = peg$parse_(); + // @ts-ignore + if (s18 === peg$FAILED) { + // @ts-ignore + s18 = null; + } + // @ts-ignore + s19 = peg$parseRPAREN(); + // @ts-ignore + if (s19 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f10(s5, s9, s13, s17); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseRecordExpressionTuple() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9; -// @ts-ignore - function // @ts-ignore -peg$parseSelectStatement() { -// @ts-ignore - var s0, s1, s2, s3; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$parseSELP(); -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$parse_(); -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - s3 = peg$parseInteger(); -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f20(s3); -// @ts-ignore + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseLPAREN(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = peg$parseVarStatement(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseCOMMA(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseOffsetStatement(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s9 = peg$parseRPAREN(); + // @ts-ignore + if (s9 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f11(s3, s7); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; + + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseRecordExpressionTupleList() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7, s8; -// @ts-ignore - function // @ts-ignore -peg$parseIdentifier() { -// @ts-ignore - var s0, s1, s2, s3, s4; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$currPos; -// @ts-ignore - s2 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r0.test(s2)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s2 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e0); } - } -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - s3 = []; -// @ts-ignore - s4 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r1.test(s4)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s4 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e1); } - } -// @ts-ignore - while (s4 !== peg$FAILED) { -// @ts-ignore - s3.push(s4); -// @ts-ignore - s4 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r1.test(s4)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseLBRACKET(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = []; + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseRecordExpressionTuple(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + while (s4 !== peg$FAILED) { + // @ts-ignore + s3.push(s4); + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + s5 = peg$parseRecordExpressionTuple(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s5 = [s5, s6, s7, s8]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + } + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseRecordExpressionTuple(); + // @ts-ignore + if (s5 === peg$FAILED) { + // @ts-ignore + s5 = null; + } + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseRBRACKET(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f12(s3, s5); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore } else { -// @ts-ignore - s4 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e1); } + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; } + + // @ts-ignore + return s0; } -// @ts-ignore - s2 = [s2, s3]; -// @ts-ignore - s1 = s2; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s1; -// @ts-ignore - s1 = peg$FAILED; - } -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s1 = peg$f21(s1); - } -// @ts-ignore - s0 = s1; -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseRecordExpression() { + // @ts-ignore + var s0, + s1, + s2, + s3, + s4, + s5, + s6, + s7, + s8, + s9, + s10, + s11, + s12, + s13, + s14, + s15; -// @ts-ignore - function // @ts-ignore -peg$parsePrimitiveOperation() { -// @ts-ignore - var s0; + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseRECORD(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = peg$parseLPAREN(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$parse_(); + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s5 = peg$parseRecordExpressionTupleList(); + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = peg$parse_(); + // @ts-ignore + if (s6 === peg$FAILED) { + // @ts-ignore + s6 = null; + } + // @ts-ignore + s7 = peg$parseCOMMA(); + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + s8 = peg$parse_(); + // @ts-ignore + if (s8 === peg$FAILED) { + // @ts-ignore + s8 = null; + } + // @ts-ignore + s9 = peg$parseLiteral(); + // @ts-ignore + if (s9 !== peg$FAILED) { + // @ts-ignore + s10 = peg$parse_(); + // @ts-ignore + if (s10 === peg$FAILED) { + // @ts-ignore + s10 = null; + } + // @ts-ignore + s11 = peg$parseCOMMA(); + // @ts-ignore + if (s11 !== peg$FAILED) { + // @ts-ignore + s12 = peg$parse_(); + // @ts-ignore + if (s12 === peg$FAILED) { + // @ts-ignore + s12 = null; + } + // @ts-ignore + s13 = peg$parseContinuationExpression(); + // @ts-ignore + if (s13 !== peg$FAILED) { + // @ts-ignore + s14 = peg$parse_(); + // @ts-ignore + if (s14 === peg$FAILED) { + // @ts-ignore + s14 = null; + } + // @ts-ignore + s15 = peg$parseRPAREN(); + // @ts-ignore + if (s15 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f13(s5, s9, s13); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } -// @ts-ignore - s0 = peg$parseArithmeticOperation(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseComparisonOperation(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseBitOperation(); -// @ts-ignore + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseValue() { + // @ts-ignore + var s0; + + // @ts-ignore + s0 = peg$parseVarStatement(); + // @ts-ignore if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseStoreOperation(); - } - } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseStoreOperation() { -// @ts-ignore - var s0; - -// @ts-ignore - s0 = peg$parseSTORE(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseUPDATE(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseMAKEREF(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseMAKEREFUNBOXED(); -// @ts-ignore + // @ts-ignore + s0 = peg$parseLabelStatement(); + // @ts-ignore if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseUNBOXED_UPDATE(); -// @ts-ignore + // @ts-ignore + s0 = peg$parseIntStatement(); + // @ts-ignore if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseBOXED(); -// @ts-ignore + // @ts-ignore + s0 = peg$parseRealStatement(); + // @ts-ignore if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseSUBSCRIPT(); + // @ts-ignore + s0 = peg$parseStringStatement(); } } } } + + // @ts-ignore + return s0; } - } -// @ts-ignore - return s0; - } + // @ts-ignore + function // @ts-ignore + peg$parseVarStatement() { + // @ts-ignore + var s0, s1, s2, s3; -// @ts-ignore - function // @ts-ignore -peg$parseArithmeticOperation() { -// @ts-ignore - var s0; - -// @ts-ignore - s0 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r2.test(s0)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e2); } - } -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - if (input.substr(peg$currPos, 2) === peg$c0) { -// @ts-ignore - s0 = peg$c0; -// @ts-ignore - peg$currPos += 2; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e3); } - } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseBitOperation() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 2) === peg$c1) { -// @ts-ignore - s0 = peg$c1; -// @ts-ignore - peg$currPos += 2; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e4); } - } -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - if (input.substr(peg$currPos, 2) === peg$c2) { -// @ts-ignore - s0 = peg$c2; -// @ts-ignore - peg$currPos += 2; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e5); } - } -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r3.test(s0)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e6); } - } - } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseComparisonOperation() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 2) === peg$c3) { -// @ts-ignore - s0 = peg$c3; -// @ts-ignore - peg$currPos += 2; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e7); } - } -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - if (input.substr(peg$currPos, 2) === peg$c4) { -// @ts-ignore - s0 = peg$c4; -// @ts-ignore - peg$currPos += 2; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e8); } - } -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - if (input.substr(peg$currPos, 2) === peg$c5) { -// @ts-ignore - s0 = peg$c5; -// @ts-ignore - peg$currPos += 2; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e9); } - } -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - if (input.substr(peg$currPos, 2) === peg$c6) { -// @ts-ignore - s0 = peg$c6; -// @ts-ignore - peg$currPos += 2; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e10); } - } -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r4.test(s0)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseVAR(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 !== peg$FAILED) { + // @ts-ignore + s3 = peg$parseIdentifier(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f14(s3); + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore + peg$currPos = s0; + // @ts-ignore s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e11); } } - } - } - } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseInteger() { -// @ts-ignore - var s0, s1, s2, s3; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = []; -// @ts-ignore - s2 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r5.test(s2)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s2 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e12); } - } -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - while (s2 !== peg$FAILED) { -// @ts-ignore - s1.push(s2); -// @ts-ignore - s2 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r5.test(s2)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s2 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e12); } - } - } -// @ts-ignore - } else { -// @ts-ignore - s1 = peg$FAILED; - } -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = peg$currPos; -// @ts-ignore - peg$silentFails++; -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 46) { -// @ts-ignore - s3 = peg$c7; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s3 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e13); } - } -// @ts-ignore - peg$silentFails--; -// @ts-ignore - if (s3 === peg$FAILED) { -// @ts-ignore - s2 = undefined; -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s2; -// @ts-ignore - s2 = peg$FAILED; - } -// @ts-ignore - if (s2 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f22(s1); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseQuotedString() { -// @ts-ignore - var s0, s1, s2, s3; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 39) { -// @ts-ignore - s1 = peg$c8; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s1 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e14); } - } -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = []; -// @ts-ignore - s3 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r6.test(s3)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s3 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e15); } - } -// @ts-ignore - while (s3 !== peg$FAILED) { -// @ts-ignore - s2.push(s3); -// @ts-ignore - s3 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r6.test(s3)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s3 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e15); } - } - } -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 39) { -// @ts-ignore - s3 = peg$c8; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s3 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e14); } - } -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f23(s2); -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 34) { -// @ts-ignore - s1 = peg$c9; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s1 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e16); } - } -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - s2 = []; -// @ts-ignore - s3 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r7.test(s3)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s3 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e17); } - } -// @ts-ignore - while (s3 !== peg$FAILED) { -// @ts-ignore - s2.push(s3); -// @ts-ignore - s3 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r7.test(s3)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore - s3 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e17); } + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; } - } -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 34) { -// @ts-ignore - s3 = peg$c9; -// @ts-ignore - peg$currPos++; -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore - s3 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e16); } - } -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s0 = peg$f24(s2); -// @ts-ignore - } else { -// @ts-ignore + // @ts-ignore peg$currPos = s0; -// @ts-ignore + // @ts-ignore s0 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s0; -// @ts-ignore - s0 = peg$FAILED; - } - } -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseReal() { -// @ts-ignore - var s0, s1, s2, s3, s4, s5, s6; - -// @ts-ignore - s0 = peg$currPos; -// @ts-ignore - s1 = peg$currPos; -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 45) { -// @ts-ignore - s2 = peg$c10; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s2 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e18); } - } -// @ts-ignore - if (s2 === peg$FAILED) { -// @ts-ignore - s2 = null; - } -// @ts-ignore - s3 = []; -// @ts-ignore - s4 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r5.test(s4)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s4 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e12); } - } -// @ts-ignore - if (s4 !== peg$FAILED) { -// @ts-ignore - while (s4 !== peg$FAILED) { -// @ts-ignore - s3.push(s4); -// @ts-ignore - s4 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r5.test(s4)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s4 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e12); } - } + // @ts-ignore + return s0; } -// @ts-ignore - } else { -// @ts-ignore - s3 = peg$FAILED; - } -// @ts-ignore - if (s3 !== peg$FAILED) { -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 46) { -// @ts-ignore - s4 = peg$c7; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s4 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e13); } - } -// @ts-ignore - if (s4 !== peg$FAILED) { -// @ts-ignore - s5 = []; -// @ts-ignore - s6 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r5.test(s6)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s6 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e12); } - } -// @ts-ignore - if (s6 !== peg$FAILED) { -// @ts-ignore - while (s6 !== peg$FAILED) { -// @ts-ignore - s5.push(s6); -// @ts-ignore - s6 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r5.test(s6)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore + + // @ts-ignore + function // @ts-ignore + peg$parseLabelStatement() { + // @ts-ignore + var s0, s1, s2, s3; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseLABEL(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 !== peg$FAILED) { + // @ts-ignore + s3 = peg$parseIdentifier(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f15(s3); + // @ts-ignore } else { -// @ts-ignore - s6 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e12); } + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseIntStatement() { + // @ts-ignore + var s0, s1, s2, s3; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseINT(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 !== peg$FAILED) { + // @ts-ignore + s3 = peg$parseInteger(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f16(s3); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseRealStatement() { + // @ts-ignore + var s0, s1, s2, s3; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseREAL(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 !== peg$FAILED) { + // @ts-ignore + s3 = peg$parseReal(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f17(s3); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseStringStatement() { + // @ts-ignore + var s0, s1, s2, s3; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseSTRING(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 !== peg$FAILED) { + // @ts-ignore + s3 = peg$parseQuotedString(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f18(s3); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseAccessStatement() { + // @ts-ignore + var s0; + + // @ts-ignore + s0 = peg$parseOffsetStatement(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseSelectStatement(); + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseOffsetStatement() { + // @ts-ignore + var s0, s1, s2, s3; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseOFFP(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 !== peg$FAILED) { + // @ts-ignore + s3 = peg$parseInteger(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f19(s3); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSelectStatement() { + // @ts-ignore + var s0, s1, s2, s3; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$parseSELP(); + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$parse_(); + // @ts-ignore + if (s2 !== peg$FAILED) { + // @ts-ignore + s3 = peg$parseInteger(); + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f20(s3); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseIdentifier() { + // @ts-ignore + var s0, s1, s2, s3, s4; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$currPos; + // @ts-ignore + s2 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r0.test(s2)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s2 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e0); + } + } + // @ts-ignore + if (s2 !== peg$FAILED) { + // @ts-ignore + s3 = []; + // @ts-ignore + s4 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r1.test(s4)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s4 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e1); } } -// @ts-ignore - } else { -// @ts-ignore - s5 = peg$FAILED; - } -// @ts-ignore - if (s5 !== peg$FAILED) { -// @ts-ignore - s2 = [s2, s3, s4, s5]; -// @ts-ignore + // @ts-ignore + while (s4 !== peg$FAILED) { + // @ts-ignore + s3.push(s4); + // @ts-ignore + s4 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r1.test(s4)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s4 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e1); + } + } + } + // @ts-ignore + s2 = [s2, s3]; + // @ts-ignore s1 = s2; -// @ts-ignore + // @ts-ignore } else { -// @ts-ignore + // @ts-ignore peg$currPos = s1; -// @ts-ignore + // @ts-ignore s1 = peg$FAILED; } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s1; -// @ts-ignore - s1 = peg$FAILED; - } -// @ts-ignore - } else { -// @ts-ignore - peg$currPos = s1; -// @ts-ignore - s1 = peg$FAILED; - } -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - peg$savedPos = s0; -// @ts-ignore - s1 = peg$f25(s1); - } -// @ts-ignore - s0 = s1; - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseLiteral() { -// @ts-ignore - var s0; - -// @ts-ignore - s0 = peg$parseReal(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseQuotedString(); -// @ts-ignore - if (s0 === peg$FAILED) { -// @ts-ignore - s0 = peg$parseInteger(); - } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseOFFSET() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 6) === peg$c11) { -// @ts-ignore - s0 = peg$c11; -// @ts-ignore - peg$currPos += 6; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e19); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseOFFP() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 4) === peg$c12) { -// @ts-ignore - s0 = peg$c12; -// @ts-ignore - peg$currPos += 4; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e20); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseSELP() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 4) === peg$c13) { -// @ts-ignore - s0 = peg$c13; -// @ts-ignore - peg$currPos += 4; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e21); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseVAR() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 3) === peg$c14) { -// @ts-ignore - s0 = peg$c14; -// @ts-ignore - peg$currPos += 3; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e22); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseINT() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 3) === peg$c15) { -// @ts-ignore - s0 = peg$c15; -// @ts-ignore - peg$currPos += 3; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e23); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseREAL() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 4) === peg$c16) { -// @ts-ignore - s0 = peg$c16; -// @ts-ignore - peg$currPos += 4; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e24); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseSTRING() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 6) === peg$c17) { -// @ts-ignore - s0 = peg$c17; -// @ts-ignore - peg$currPos += 6; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e25); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseAPP() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 3) === peg$c18) { -// @ts-ignore - s0 = peg$c18; -// @ts-ignore - peg$currPos += 3; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e26); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseRECORD() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 6) === peg$c19) { -// @ts-ignore - s0 = peg$c19; -// @ts-ignore - peg$currPos += 6; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e27); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseSELECT() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 6) === peg$c20) { -// @ts-ignore - s0 = peg$c20; -// @ts-ignore - peg$currPos += 6; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e28); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseFIX() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 3) === peg$c21) { -// @ts-ignore - s0 = peg$c21; -// @ts-ignore - peg$currPos += 3; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e29); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseSWITCH() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 6) === peg$c22) { -// @ts-ignore - s0 = peg$c22; -// @ts-ignore - peg$currPos += 6; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e30); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parsePRIMOP() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 6) === peg$c23) { -// @ts-ignore - s0 = peg$c23; -// @ts-ignore - peg$currPos += 6; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e31); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseLABEL() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 5) === peg$c24) { -// @ts-ignore - s0 = peg$c24; -// @ts-ignore - peg$currPos += 5; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e32); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseSTORE() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 5) === peg$c25) { -// @ts-ignore - s0 = peg$c25; -// @ts-ignore - peg$currPos += 5; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e33); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseUPDATE() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 6) === peg$c26) { -// @ts-ignore - s0 = peg$c26; -// @ts-ignore - peg$currPos += 6; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e34); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseMAKEREF() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 7) === peg$c27) { -// @ts-ignore - s0 = peg$c27; -// @ts-ignore - peg$currPos += 7; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e35); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseMAKEREFUNBOXED() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 14) === peg$c28) { -// @ts-ignore - s0 = peg$c28; -// @ts-ignore - peg$currPos += 14; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e36); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseUNBOXED_UPDATE() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 13) === peg$c29) { -// @ts-ignore - s0 = peg$c29; -// @ts-ignore - peg$currPos += 13; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e37); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseSUBSCRIPT() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 9) === peg$c30) { -// @ts-ignore - s0 = peg$c30; -// @ts-ignore - peg$currPos += 9; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e38); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseBOXED() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.substr(peg$currPos, 5) === peg$c31) { -// @ts-ignore - s0 = peg$c31; -// @ts-ignore - peg$currPos += 5; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e39); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseLETTER() { -// @ts-ignore - var s0; - -// @ts-ignore - s0 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r0.test(s0)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e0); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseSAFE_SYMBOL() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 95) { -// @ts-ignore - s0 = peg$c32; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e40); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseDIGIT() { -// @ts-ignore - var s0; - -// @ts-ignore - s0 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r5.test(s0)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e12); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseLBRACKET() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 91) { -// @ts-ignore - s0 = peg$c33; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e41); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseRBRACKET() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 93) { -// @ts-ignore - s0 = peg$c34; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e42); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseCOMMA() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 44) { -// @ts-ignore - s0 = peg$c35; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e43); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseEQUALS() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 61) { -// @ts-ignore - s0 = peg$c36; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e44); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseLPAREN() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 40) { -// @ts-ignore - s0 = peg$c37; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e45); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parseRPAREN() { -// @ts-ignore - var s0; - -// @ts-ignore - if (input.charCodeAt(peg$currPos) === 41) { -// @ts-ignore - s0 = peg$c38; -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e46); } - } - -// @ts-ignore - return s0; - } - -// @ts-ignore - function // @ts-ignore -peg$parse_() { -// @ts-ignore - var s0, s1; - -// @ts-ignore - s0 = []; -// @ts-ignore - s1 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r8.test(s1)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s1 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e47); } - } -// @ts-ignore - if (s1 === peg$FAILED) { -// @ts-ignore - if (input.substr(peg$currPos, 2) === peg$c39) { -// @ts-ignore - s1 = peg$c39; -// @ts-ignore - peg$currPos += 2; -// @ts-ignore - } else { -// @ts-ignore - s1 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e48); } - } - } -// @ts-ignore - if (s1 !== peg$FAILED) { -// @ts-ignore - while (s1 !== peg$FAILED) { -// @ts-ignore - s0.push(s1); -// @ts-ignore - s1 = input.charAt(peg$currPos); -// @ts-ignore - if (peg$r8.test(s1)) { -// @ts-ignore - peg$currPos++; -// @ts-ignore - } else { -// @ts-ignore - s1 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e47); } + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s1 = peg$f21(s1); } -// @ts-ignore - if (s1 === peg$FAILED) { -// @ts-ignore - if (input.substr(peg$currPos, 2) === peg$c39) { -// @ts-ignore - s1 = peg$c39; -// @ts-ignore - peg$currPos += 2; -// @ts-ignore - } else { -// @ts-ignore - s1 = peg$FAILED; -// @ts-ignore - if (peg$silentFails === 0) { peg$fail(peg$e48); } + // @ts-ignore + s0 = s1; + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parsePrimitiveOperation() { + // @ts-ignore + var s0; + + // @ts-ignore + s0 = peg$parseArithmeticOperation(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseComparisonOperation(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseBitOperation(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseStoreOperation(); + } } } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseStoreOperation() { + // @ts-ignore + var s0; + + // @ts-ignore + s0 = peg$parseSTORE(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseUPDATE(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseMAKEREF(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseMAKEREFUNBOXED(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseUNBOXED_UPDATE(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseBOXED(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseSUBSCRIPT(); + } + } + } + } + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseArithmeticOperation() { + // @ts-ignore + var s0; + + // @ts-ignore + s0 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r2.test(s0)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e2); + } + } + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + if (input.substr(peg$currPos, 2) === peg$c0) { + // @ts-ignore + s0 = peg$c0; + // @ts-ignore + peg$currPos += 2; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e3); + } + } + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 37) { + // @ts-ignore + s0 = peg$c1; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e4); + } + } + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseBitOperation() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 2) === peg$c2) { + // @ts-ignore + s0 = peg$c2; + // @ts-ignore + peg$currPos += 2; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e5); + } + } + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + if (input.substr(peg$currPos, 2) === peg$c3) { + // @ts-ignore + s0 = peg$c3; + // @ts-ignore + peg$currPos += 2; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e6); + } + } + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r3.test(s0)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e7); + } + } + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseComparisonOperation() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 2) === peg$c4) { + // @ts-ignore + s0 = peg$c4; + // @ts-ignore + peg$currPos += 2; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e8); + } + } + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + if (input.substr(peg$currPos, 2) === peg$c5) { + // @ts-ignore + s0 = peg$c5; + // @ts-ignore + peg$currPos += 2; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e9); + } + } + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + if (input.substr(peg$currPos, 2) === peg$c6) { + // @ts-ignore + s0 = peg$c6; + // @ts-ignore + peg$currPos += 2; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e10); + } + } + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + if (input.substr(peg$currPos, 2) === peg$c7) { + // @ts-ignore + s0 = peg$c7; + // @ts-ignore + peg$currPos += 2; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e11); + } + } + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r4.test(s0)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e12); + } + } + } + } + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseInteger() { + // @ts-ignore + var s0, s1, s2, s3, s4; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$currPos; + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 45) { + // @ts-ignore + s2 = peg$c8; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s2 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e13); + } + } + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = []; + // @ts-ignore + s4 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r5.test(s4)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s4 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e14); + } + } + // @ts-ignore + if (s4 !== peg$FAILED) { + // @ts-ignore + while (s4 !== peg$FAILED) { + // @ts-ignore + s3.push(s4); + // @ts-ignore + s4 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r5.test(s4)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s4 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e14); + } + } + } + // @ts-ignore + } else { + // @ts-ignore + s3 = peg$FAILED; + } + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s2 = [s2, s3]; + // @ts-ignore + s1 = s2; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s1; + // @ts-ignore + s1 = peg$FAILED; + } + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = peg$currPos; + // @ts-ignore + peg$silentFails++; + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 46) { + // @ts-ignore + s3 = peg$c9; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s3 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e15); + } + } + // @ts-ignore + peg$silentFails--; + // @ts-ignore + if (s3 === peg$FAILED) { + // @ts-ignore + s2 = undefined; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s2; + // @ts-ignore + s2 = peg$FAILED; + } + // @ts-ignore + if (s2 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f22(s1); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseQuotedString() { + // @ts-ignore + var s0, s1, s2, s3; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 39) { + // @ts-ignore + s1 = peg$c10; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s1 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e16); + } + } + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = []; + // @ts-ignore + s3 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r6.test(s3)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s3 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e17); + } + } + // @ts-ignore + while (s3 !== peg$FAILED) { + // @ts-ignore + s2.push(s3); + // @ts-ignore + s3 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r6.test(s3)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s3 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e17); + } + } + } + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 39) { + // @ts-ignore + s3 = peg$c10; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s3 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e16); + } + } + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f23(s2); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 34) { + // @ts-ignore + s1 = peg$c11; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s1 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e18); + } + } + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + s2 = []; + // @ts-ignore + s3 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r7.test(s3)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s3 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e19); + } + } + // @ts-ignore + while (s3 !== peg$FAILED) { + // @ts-ignore + s2.push(s3); + // @ts-ignore + s3 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r7.test(s3)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s3 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e19); + } + } + } + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 34) { + // @ts-ignore + s3 = peg$c11; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s3 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e18); + } + } + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s0 = peg$f24(s2); + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s0; + // @ts-ignore + s0 = peg$FAILED; + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseReal() { + // @ts-ignore + var s0, s1, s2, s3, s4, s5, s6, s7; + + // @ts-ignore + s0 = peg$currPos; + // @ts-ignore + s1 = peg$currPos; + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 45) { + // @ts-ignore + s2 = peg$c8; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s2 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e13); + } + } + // @ts-ignore + if (s2 === peg$FAILED) { + // @ts-ignore + s2 = null; + } + // @ts-ignore + s3 = []; + // @ts-ignore + s4 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r5.test(s4)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s4 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e14); + } + } + // @ts-ignore + if (s4 !== peg$FAILED) { + // @ts-ignore + while (s4 !== peg$FAILED) { + // @ts-ignore + s3.push(s4); + // @ts-ignore + s4 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r5.test(s4)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s4 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e14); + } + } + } + // @ts-ignore + } else { + // @ts-ignore + s3 = peg$FAILED; + } + // @ts-ignore + if (s3 !== peg$FAILED) { + // @ts-ignore + s4 = peg$currPos; + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 46) { + // @ts-ignore + s5 = peg$c9; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s5 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e15); + } + } + // @ts-ignore + if (s5 !== peg$FAILED) { + // @ts-ignore + s6 = []; + // @ts-ignore + s7 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r5.test(s7)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s7 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e14); + } + } + // @ts-ignore + if (s7 !== peg$FAILED) { + // @ts-ignore + while (s7 !== peg$FAILED) { + // @ts-ignore + s6.push(s7); + // @ts-ignore + s7 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r5.test(s7)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s7 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e14); + } + } + } + // @ts-ignore + } else { + // @ts-ignore + s6 = peg$FAILED; + } + // @ts-ignore + if (s6 !== peg$FAILED) { + // @ts-ignore + s5 = [s5, s6]; + // @ts-ignore + s4 = s5; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s4; + // @ts-ignore + s4 = peg$FAILED; + } + // @ts-ignore + if (s4 === peg$FAILED) { + // @ts-ignore + s4 = null; + } + // @ts-ignore + s2 = [s2, s3, s4]; + // @ts-ignore + s1 = s2; + // @ts-ignore + } else { + // @ts-ignore + peg$currPos = s1; + // @ts-ignore + s1 = peg$FAILED; + } + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + peg$savedPos = s0; + // @ts-ignore + s1 = peg$f25(s1); + } + // @ts-ignore + s0 = s1; + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseLiteral() { + // @ts-ignore + var s0; + + // @ts-ignore + s0 = peg$parseReal(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseQuotedString(); + // @ts-ignore + if (s0 === peg$FAILED) { + // @ts-ignore + s0 = peg$parseInteger(); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseOFFSET() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 6) === peg$c12) { + // @ts-ignore + s0 = peg$c12; + // @ts-ignore + peg$currPos += 6; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e20); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseOFFP() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 4) === peg$c13) { + // @ts-ignore + s0 = peg$c13; + // @ts-ignore + peg$currPos += 4; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e21); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSELP() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 4) === peg$c14) { + // @ts-ignore + s0 = peg$c14; + // @ts-ignore + peg$currPos += 4; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e22); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseVAR() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 3) === peg$c15) { + // @ts-ignore + s0 = peg$c15; + // @ts-ignore + peg$currPos += 3; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e23); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseINT() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 3) === peg$c16) { + // @ts-ignore + s0 = peg$c16; + // @ts-ignore + peg$currPos += 3; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e24); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseREAL() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 4) === peg$c17) { + // @ts-ignore + s0 = peg$c17; + // @ts-ignore + peg$currPos += 4; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e25); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSTRING() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 6) === peg$c18) { + // @ts-ignore + s0 = peg$c18; + // @ts-ignore + peg$currPos += 6; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e26); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseAPP() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 3) === peg$c19) { + // @ts-ignore + s0 = peg$c19; + // @ts-ignore + peg$currPos += 3; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e27); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseRECORD() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 6) === peg$c20) { + // @ts-ignore + s0 = peg$c20; + // @ts-ignore + peg$currPos += 6; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e28); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSELECT() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 6) === peg$c21) { + // @ts-ignore + s0 = peg$c21; + // @ts-ignore + peg$currPos += 6; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e29); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseFIX() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 3) === peg$c22) { + // @ts-ignore + s0 = peg$c22; + // @ts-ignore + peg$currPos += 3; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e30); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSWITCH() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 6) === peg$c23) { + // @ts-ignore + s0 = peg$c23; + // @ts-ignore + peg$currPos += 6; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e31); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parsePRIMOP() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 6) === peg$c24) { + // @ts-ignore + s0 = peg$c24; + // @ts-ignore + peg$currPos += 6; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e32); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseLABEL() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 5) === peg$c25) { + // @ts-ignore + s0 = peg$c25; + // @ts-ignore + peg$currPos += 5; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e33); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSTORE() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 5) === peg$c26) { + // @ts-ignore + s0 = peg$c26; + // @ts-ignore + peg$currPos += 5; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e34); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseUPDATE() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 6) === peg$c27) { + // @ts-ignore + s0 = peg$c27; + // @ts-ignore + peg$currPos += 6; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e35); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseMAKEREF() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 7) === peg$c28) { + // @ts-ignore + s0 = peg$c28; + // @ts-ignore + peg$currPos += 7; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e36); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseMAKEREFUNBOXED() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 14) === peg$c29) { + // @ts-ignore + s0 = peg$c29; + // @ts-ignore + peg$currPos += 14; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e37); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseUNBOXED_UPDATE() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 13) === peg$c30) { + // @ts-ignore + s0 = peg$c30; + // @ts-ignore + peg$currPos += 13; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e38); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSUBSCRIPT() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 9) === peg$c31) { + // @ts-ignore + s0 = peg$c31; + // @ts-ignore + peg$currPos += 9; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e39); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseBOXED() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.substr(peg$currPos, 5) === peg$c32) { + // @ts-ignore + s0 = peg$c32; + // @ts-ignore + peg$currPos += 5; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e40); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseLETTER() { + // @ts-ignore + var s0; + + // @ts-ignore + s0 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r0.test(s0)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e0); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseSAFE_SYMBOL() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 95) { + // @ts-ignore + s0 = peg$c33; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e41); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseDIGIT() { + // @ts-ignore + var s0; + + // @ts-ignore + s0 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r5.test(s0)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e14); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseLBRACKET() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 91) { + // @ts-ignore + s0 = peg$c34; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e42); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseRBRACKET() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 93) { + // @ts-ignore + s0 = peg$c35; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e43); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseCOMMA() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 44) { + // @ts-ignore + s0 = peg$c36; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e44); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseEQUALS() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 61) { + // @ts-ignore + s0 = peg$c37; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e45); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseLPAREN() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 40) { + // @ts-ignore + s0 = peg$c38; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e46); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parseRPAREN() { + // @ts-ignore + var s0; + + // @ts-ignore + if (input.charCodeAt(peg$currPos) === 41) { + // @ts-ignore + s0 = peg$c39; + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e47); + } + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + function // @ts-ignore + peg$parse_() { + // @ts-ignore + var s0, s1; + + // @ts-ignore + s0 = []; + // @ts-ignore + s1 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r8.test(s1)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s1 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e48); + } + } + // @ts-ignore + if (s1 === peg$FAILED) { + // @ts-ignore + if (input.substr(peg$currPos, 2) === peg$c40) { + // @ts-ignore + s1 = peg$c40; + // @ts-ignore + peg$currPos += 2; + // @ts-ignore + } else { + // @ts-ignore + s1 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e49); + } + } + } + // @ts-ignore + if (s1 !== peg$FAILED) { + // @ts-ignore + while (s1 !== peg$FAILED) { + // @ts-ignore + s0.push(s1); + // @ts-ignore + s1 = input.charAt(peg$currPos); + // @ts-ignore + if (peg$r8.test(s1)) { + // @ts-ignore + peg$currPos++; + // @ts-ignore + } else { + // @ts-ignore + s1 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e48); + } + } + // @ts-ignore + if (s1 === peg$FAILED) { + // @ts-ignore + if (input.substr(peg$currPos, 2) === peg$c40) { + // @ts-ignore + s1 = peg$c40; + // @ts-ignore + peg$currPos += 2; + // @ts-ignore + } else { + // @ts-ignore + s1 = peg$FAILED; + // @ts-ignore + if (peg$silentFails === 0) { + peg$fail(peg$e49); + } + } + } + } + // @ts-ignore + } else { + // @ts-ignore + s0 = peg$FAILED; + } + + // @ts-ignore + return s0; + } + + // @ts-ignore + peg$result = peg$startRuleFunction(); + + // @ts-ignore + if (options.peg$library) { + // @ts-ignore + return /** @type {any} */ { + // @ts-ignore + peg$result, + // @ts-ignore + peg$currPos, + // @ts-ignore + peg$FAILED, + // @ts-ignore + peg$maxFailExpected, + // @ts-ignore + peg$maxFailPos, + }; + } + // @ts-ignore + if (peg$result !== peg$FAILED && peg$currPos === input.length) { + // @ts-ignore + return peg$result; + // @ts-ignore + } else { + // @ts-ignore + if (peg$result !== peg$FAILED && peg$currPos < input.length) { + // @ts-ignore + peg$fail(peg$endExpectation()); + } + + // @ts-ignore + throw peg$buildStructuredError( + // @ts-ignore + peg$maxFailExpected, + // @ts-ignore + peg$maxFailPos < input.length ? input.charAt(peg$maxFailPos) : null, + // @ts-ignore + peg$maxFailPos < input.length + ? // @ts-ignore + peg$computeLocation(peg$maxFailPos, peg$maxFailPos + 1) + : // @ts-ignore + peg$computeLocation(peg$maxFailPos, peg$maxFailPos), + ); } -// @ts-ignore - } else { -// @ts-ignore - s0 = peg$FAILED; } -// @ts-ignore - return s0; - } - -// @ts-ignore - peg$result = peg$startRuleFunction(); - -// @ts-ignore - if (options.peg$library) { -// @ts-ignore - return /** @type {any} */ ({ -// @ts-ignore - peg$result, -// @ts-ignore - peg$currPos, -// @ts-ignore - peg$FAILED, -// @ts-ignore - peg$maxFailExpected, -// @ts-ignore - peg$maxFailPos - }); - } -// @ts-ignore - if (peg$result !== peg$FAILED && peg$currPos === input.length) { -// @ts-ignore - return peg$result; -// @ts-ignore - } else { -// @ts-ignore - if (peg$result !== peg$FAILED && peg$currPos < input.length) { -// @ts-ignore - peg$fail(peg$endExpectation()); - } - -// @ts-ignore - throw peg$buildStructuredError( -// @ts-ignore - peg$maxFailExpected, -// @ts-ignore - peg$maxFailPos < input.length ? input.charAt(peg$maxFailPos) : null, -// @ts-ignore - peg$maxFailPos < input.length -// @ts-ignore - ? peg$computeLocation(peg$maxFailPos, peg$maxFailPos + 1) -// @ts-ignore - : peg$computeLocation(peg$maxFailPos, peg$maxFailPos) - ); - } -} - -// @ts-ignore - return { - StartRules: ["Program"], - SyntaxError: peg$SyntaxError, - parse: peg$parse - }; -})() + // @ts-ignore + return { + StartRules: ['Program'], + SyntaxError: peg$SyntaxError, + parse: peg$parse, + }; + })(); export interface FilePosition { offset: number; @@ -5048,7 +5420,7 @@ export interface FileRange { } export interface LiteralExpectation { - type: "literal"; + type: 'literal'; text: string; ignoreCase: boolean; } @@ -5056,70 +5428,88 @@ export interface LiteralExpectation { export interface ClassParts extends Array {} export interface ClassExpectation { - type: "class"; + type: 'class'; parts: ClassParts; inverted: boolean; ignoreCase: boolean; } export interface AnyExpectation { - type: "any"; + type: 'any'; } export interface EndExpectation { - type: "end"; + type: 'end'; } export interface OtherExpectation { - type: "other"; + type: 'other'; description: string; } -export type Expectation = LiteralExpectation | ClassExpectation | AnyExpectation | EndExpectation | OtherExpectation; +export type Expectation = + | LiteralExpectation + | ClassExpectation + | AnyExpectation + | EndExpectation + | OtherExpectation; declare class _PeggySyntaxError extends Error { - public static buildMessage(expected: Expectation[], found: string | null): string; + public static buildMessage( + expected: Expectation[], + found: string | null, + ): string; public message: string; public expected: Expectation[]; public found: string | null; public location: FileRange; public name: string; - constructor(message: string, expected: Expectation[], found: string | null, location: FileRange); - format(sources: { - source?: any; - text: string; - }[]): string; + constructor( + message: string, + expected: Expectation[], + found: string | null, + location: FileRange, + ); + format( + sources: { + source?: any; + text: string; + }[], + ): string; } export interface TraceEvent { - type: string; - rule: string; - result?: any; - location: FileRange; - } + type: string; + rule: string; + result?: any; + location: FileRange; +} declare class _DefaultTracer { private indentLevel: number; public trace(event: TraceEvent): void; } -peggyParser.SyntaxError.prototype.name = "PeggySyntaxError"; +peggyParser.SyntaxError.prototype.name = 'PeggySyntaxError'; export interface ParseOptions { filename?: string; - startRule?: "Program"; + startRule?: 'Program'; tracer?: any; [key: string]: any; } export type ParseFunction = ( - input: string, - options?: Options - ) => Options extends { startRule: infer StartRule } ? - StartRule extends "Program" ? Program : Program - : Program; + input: string, + options?: Options, +) => Options extends { startRule: infer StartRule } + ? StartRule extends 'Program' + ? Program + : Program + : Program; export const parse: ParseFunction = peggyParser.parse; -export const PeggySyntaxError = peggyParser.SyntaxError as typeof _PeggySyntaxError; +export const PeggySyntaxError = + peggyParser.SyntaxError as typeof _PeggySyntaxError; export type PeggySyntaxError = _PeggySyntaxError; @@ -5170,7 +5560,7 @@ export type FixBinding = [ _ | null, ContinuationExpression, _ | null, - RPAREN + RPAREN, ]; export type FixBindingList = any[]; export type FixExpression = { @@ -5225,41 +5615,41 @@ export type StoreOperation = | UNBOXEDUPDATE | BOXED | SUBSCRIPT; -export type ArithmeticOperation = string | "**"; -export type BitOperation = ">>" | "<<" | string; -export type ComparisonOperation = "==" | "<=" | ">=" | "!=" | string; -export type Integer = number; +export type ArithmeticOperation = string | '**' | '%'; +export type BitOperation = '>>' | '<<' | string; +export type ComparisonOperation = '==' | '<=' | '>=' | '!=' | string; +export type Integer = { int: number }; export type QuotedString = string; -export type Real = number; +export type Real = { real: number }; export type Literal = Real | QuotedString | Integer; -export type OFFSET = "OFFSET"; -export type OFFP = "OFFp"; -export type SELP = "SELp"; -export type VAR = "VAR"; -export type INT = "INT"; -export type REAL = "REAL"; -export type STRING = "STRING"; -export type APP = "APP"; -export type RECORD = "RECORD"; -export type SELECT = "SELECT"; -export type FIX = "FIX"; -export type SWITCH = "SWITCH"; -export type PRIMOP = "PRIMOP"; -export type LABEL = "LABEL"; -export type STORE = "store"; -export type UPDATE = "update"; -export type MAKEREF = "makeref"; -export type MAKEREFUNBOXED = "makerefunboxed"; -export type UNBOXEDUPDATE = "unboxedupdate"; -export type SUBSCRIPT = "subscript"; -export type BOXED = "boxed"; +export type OFFSET = 'OFFSET'; +export type OFFP = 'OFFp'; +export type SELP = 'SELp'; +export type VAR = 'VAR'; +export type INT = 'INT'; +export type REAL = 'REAL'; +export type STRING = 'STRING'; +export type APP = 'APP'; +export type RECORD = 'RECORD'; +export type SELECT = 'SELECT'; +export type FIX = 'FIX'; +export type SWITCH = 'SWITCH'; +export type PRIMOP = 'PRIMOP'; +export type LABEL = 'LABEL'; +export type STORE = 'store'; +export type UPDATE = 'update'; +export type MAKEREF = 'makeref'; +export type MAKEREFUNBOXED = 'makerefunboxed'; +export type UNBOXEDUPDATE = 'unboxedupdate'; +export type SUBSCRIPT = 'subscript'; +export type BOXED = 'boxed'; export type LETTER = string; -export type SAFESYMBOL = "_"; +export type SAFESYMBOL = '_'; export type DIGIT = string; -export type LBRACKET = "["; -export type RBRACKET = "]"; -export type COMMA = ","; -export type EQUALS = "="; -export type LPAREN = "("; -export type RPAREN = ")"; -export type _ = (string | "\r\n")[]; +export type LBRACKET = '['; +export type RBRACKET = ']'; +export type COMMA = ','; +export type EQUALS = '='; +export type LPAREN = '('; +export type RPAREN = ')'; +export type _ = (string | '\r\n')[];