UNPKG

lodash-match-pattern

Version:
2,035 lines (1,823 loc) 61 kB
/* * Generated by PEG.js 0.10.0. * * http://pegjs.org/ */ "use strict"; function peg$subclass(child, parent) { function ctor() { this.constructor = child; } ctor.prototype = parent.prototype; child.prototype = new ctor(); } function peg$SyntaxError(message, expected, found, location) { this.message = message; this.expected = expected; this.found = found; this.location = location; this.name = "SyntaxError"; if (typeof Error.captureStackTrace === "function") { Error.captureStackTrace(this, peg$SyntaxError); } } peg$subclass(peg$SyntaxError, Error); peg$SyntaxError.buildMessage = function(expected, found) { var DESCRIBE_EXPECTATION_FNS = { literal: function(expectation) { return "\"" + literalEscape(expectation.text) + "\""; }, "class": function(expectation) { var escapedParts = "", i; for (i = 0; i < expectation.parts.length; i++) { escapedParts += expectation.parts[i] instanceof Array ? classEscape(expectation.parts[i][0]) + "-" + classEscape(expectation.parts[i][1]) : classEscape(expectation.parts[i]); } return "[" + (expectation.inverted ? "^" : "") + escapedParts + "]"; }, any: function(expectation) { return "any character"; }, end: function(expectation) { return "end of input"; }, other: function(expectation) { return expectation.description; } }; function hex(ch) { return ch.charCodeAt(0).toString(16).toUpperCase(); } function literalEscape(s) { return s .replace(/\\/g, '\\\\') .replace(/"/g, '\\"') .replace(/\0/g, '\\0') .replace(/\t/g, '\\t') .replace(/\n/g, '\\n') .replace(/\r/g, '\\r') .replace(/[\x00-\x0F]/g, function(ch) { return '\\x0' + hex(ch); }) .replace(/[\x10-\x1F\x7F-\x9F]/g, function(ch) { return '\\x' + hex(ch); }); } function classEscape(s) { return s .replace(/\\/g, '\\\\') .replace(/\]/g, '\\]') .replace(/\^/g, '\\^') .replace(/-/g, '\\-') .replace(/\0/g, '\\0') .replace(/\t/g, '\\t') .replace(/\n/g, '\\n') .replace(/\r/g, '\\r') .replace(/[\x00-\x0F]/g, function(ch) { return '\\x0' + hex(ch); }) .replace(/[\x10-\x1F\x7F-\x9F]/g, function(ch) { return '\\x' + hex(ch); }); } function describeExpectation(expectation) { return DESCRIBE_EXPECTATION_FNS[expectation.type](expectation); } function describeExpected(expected) { var descriptions = new Array(expected.length), i, j; for (i = 0; i < expected.length; i++) { descriptions[i] = describeExpectation(expected[i]); } descriptions.sort(); if (descriptions.length > 0) { for (i = 1, j = 1; i < descriptions.length; i++) { if (descriptions[i - 1] !== descriptions[i]) { descriptions[j] = descriptions[i]; j++; } } descriptions.length = j; } switch (descriptions.length) { case 1: return descriptions[0]; case 2: return descriptions[0] + " or " + descriptions[1]; default: return descriptions.slice(0, -1).join(", ") + ", or " + descriptions[descriptions.length - 1]; } } function describeFound(found) { return found ? "\"" + literalEscape(found) + "\"" : "end of input"; } return "Expected " + describeExpected(expected) + " but " + describeFound(found) + " found."; }; function peg$parse(input, options) { options = options !== void 0 ? options : {}; var peg$FAILED = {}, peg$startRuleFunctions = { PatternNotation_text: peg$parsePatternNotation_text }, peg$startRuleFunction = peg$parsePatternNotation_text, peg$c0 = function(value) { return value; }, peg$c1 = function() {return '';}, peg$c2 = "[", peg$c3 = peg$literalExpectation("[", false), peg$c4 = "{", peg$c5 = peg$literalExpectation("{", false), peg$c6 = "]", peg$c7 = peg$literalExpectation("]", false), peg$c8 = "}", peg$c9 = peg$literalExpectation("}", false), peg$c10 = ":", peg$c11 = peg$literalExpectation(":", false), peg$c12 = ",", peg$c13 = peg$literalExpectation(",", false), peg$c14 = "#", peg$c15 = peg$literalExpectation("#", false), peg$c16 = /^[^\n\r]/, peg$c17 = peg$classExpectation(["\n", "\r"], true, false), peg$c18 = peg$otherExpectation("whitespace"), peg$c19 = /^[ \t\n\r]/, peg$c20 = peg$classExpectation([" ", "\t", "\n", "\r"], false, false), peg$c21 = "false", peg$c22 = peg$literalExpectation("false", false), peg$c23 = function() { return false; }, peg$c24 = "null", peg$c25 = peg$literalExpectation("null", false), peg$c26 = function() { return null; }, peg$c27 = "true", peg$c28 = peg$literalExpectation("true", false), peg$c29 = function() { return true; }, peg$c30 = function(head, m) { return m; }, peg$c31 = function(head, tail, subset) { var result = {}, i; result[head.name] = head.value; for (i = 0; i < tail.length; i++) { result[tail[i].name] = tail[i].value; } if (subset) { result[subset] = ''; } return result; }, peg$c32 = function(members) { return members !== null ? members: {}; }, peg$c33 = function(name, value) { return { name: name, value: value }; }, peg$c34 = function(head, v) { return v; }, peg$c35 = function(head, tail, setMatch) { return [head].concat(tail, setMatch || []); }, peg$c36 = function(values) { return values !== null ? values : []; }, peg$c37 = peg$otherExpectation("number"), peg$c38 = function() { return parseFloat(text()); }, peg$c39 = ".", peg$c40 = peg$literalExpectation(".", false), peg$c41 = /^[1-9]/, peg$c42 = peg$classExpectation([["1", "9"]], false, false), peg$c43 = /^[eE]/, peg$c44 = peg$classExpectation(["e", "E"], false, false), peg$c45 = "-", peg$c46 = peg$literalExpectation("-", false), peg$c47 = "+", peg$c48 = peg$literalExpectation("+", false), peg$c49 = "0", peg$c50 = peg$literalExpectation("0", false), peg$c51 = peg$otherExpectation("quoted string"), peg$c52 = peg$otherExpectation("regex"), peg$c53 = function(regstr, reflags) { return "__MP_regex(" + reflags.join("") + ") " + regstr }, peg$c54 = peg$otherExpectation("double quoted string"), peg$c55 = function(chars) { return chars.join(""); }, peg$c56 = peg$otherExpectation("single quoted string"), peg$c57 = peg$otherExpectation("regex quoted string"), peg$c58 = "\"", peg$c59 = peg$literalExpectation("\"", false), peg$c60 = function(sequence) { return sequence; }, peg$c61 = "'", peg$c62 = peg$literalExpectation("'", false), peg$c63 = "/", peg$c64 = peg$literalExpectation("/", false), peg$c65 = function() { return text() }, peg$c66 = "\\", peg$c67 = peg$literalExpectation("\\", false), peg$c68 = "b", peg$c69 = peg$literalExpectation("b", false), peg$c70 = function() { return "\b"; }, peg$c71 = "f", peg$c72 = peg$literalExpectation("f", false), peg$c73 = function() { return "\f"; }, peg$c74 = "n", peg$c75 = peg$literalExpectation("n", false), peg$c76 = function() { return "\n"; }, peg$c77 = "r", peg$c78 = peg$literalExpectation("r", false), peg$c79 = function() { return "\r"; }, peg$c80 = "t", peg$c81 = peg$literalExpectation("t", false), peg$c82 = function() { return "\t"; }, peg$c83 = "u", peg$c84 = peg$literalExpectation("u", false), peg$c85 = function(digits) { return String.fromCharCode(parseInt(digits, 16)); }, peg$c86 = /^[^\0-\x1F"\\]/, peg$c87 = peg$classExpectation([["\0", "\x1F"], "\"", "\\"], true, false), peg$c88 = /^[^\0-\x1F'\\]/, peg$c89 = peg$classExpectation([["\0", "\x1F"], "'", "\\"], true, false), peg$c90 = /^[^\0-\x1F\/]/, peg$c91 = peg$classExpectation([["\0", "\x1F"], "/"], true, false), peg$c92 = /^[gmiuy]/, peg$c93 = peg$classExpectation(["g", "m", "i", "u", "y"], false, false), peg$c94 = /^[0-9]/, peg$c95 = peg$classExpectation([["0", "9"]], false, false), peg$c96 = /^[0-9a-f]/i, peg$c97 = peg$classExpectation([["0", "9"], ["a", "f"]], false, true), peg$c98 = function() { return text() }, peg$c99 = function(alphaNum, pipeArg) {return "__MP_apply" + mapApplyCount++ + " " + alphaNum.concat(pipeArg).join("")}, peg$c100 = function() { return '__MP_apply' + mapApplyCount++ }, peg$c101 = "<-", peg$c102 = peg$literalExpectation("<-", false), peg$c103 = function(alphaNum, pipeArg) {return "__MP_map" + mapApplyCount++ + " " + alphaNum.concat(pipeArg).join("")}, peg$c104 = function() { return '__MP_map' + mapApplyCount++ }, peg$c105 = "<=", peg$c106 = peg$literalExpectation("<=", false), peg$c107 = "...", peg$c108 = peg$literalExpectation("...", false), peg$c109 = function() { return "__MP_subset" }, peg$c110 = "^^^", peg$c111 = peg$literalExpectation("^^^", false), peg$c112 = function() { return "__MP_superset" }, peg$c113 = "===", peg$c114 = peg$literalExpectation("===", false), peg$c115 = function() { return "__MP_equalset" }, peg$c116 = function(matcher) {return "__MP_match " + text().slice(2)}, peg$c117 = "_.is", peg$c118 = peg$literalExpectation("_.is", false), peg$c119 = "_.has", peg$c120 = peg$literalExpectation("_.has", false), peg$c121 = /^[A-Z]/, peg$c122 = peg$classExpectation([["A", "Z"]], false, false), peg$c123 = /^[a-zA-Z]/, peg$c124 = peg$classExpectation([["a", "z"], ["A", "Z"]], false, false), peg$c125 = /^[_0-9a-zA-Z]/, peg$c126 = peg$classExpectation(["_", ["0", "9"], ["a", "z"], ["A", "Z"]], false, false), peg$c127 = "|", peg$c128 = peg$literalExpectation("|", false), peg$c129 = /^[^|"'\n\r\t },:]/, peg$c130 = peg$classExpectation(["|", "\"", "'", "\n", "\r", "\t", " ", "}", ",", ":"], true, false), peg$c131 = /^[^\n\r']/, peg$c132 = peg$classExpectation(["\n", "\r", "'"], true, false), peg$c133 = function() {return text() }, peg$c134 = /^[^\n\r"]/, peg$c135 = peg$classExpectation(["\n", "\r", "\""], true, false), peg$currPos = 0, peg$savedPos = 0, peg$posDetailsCache = [{ line: 1, column: 1 }], peg$maxFailPos = 0, peg$maxFailExpected = [], peg$silentFails = 0, peg$result; if ("startRule" in options) { if (!(options.startRule in peg$startRuleFunctions)) { throw new Error("Can't start parsing from rule \"" + options.startRule + "\"."); } peg$startRuleFunction = peg$startRuleFunctions[options.startRule]; } function text() { return input.substring(peg$savedPos, peg$currPos); } function location() { return peg$computeLocation(peg$savedPos, peg$currPos); } function expected(description, location) { location = location !== void 0 ? location : peg$computeLocation(peg$savedPos, peg$currPos) throw peg$buildStructuredError( [peg$otherExpectation(description)], input.substring(peg$savedPos, peg$currPos), location ); } function error(message, location) { location = location !== void 0 ? location : peg$computeLocation(peg$savedPos, peg$currPos) throw peg$buildSimpleError(message, location); } function peg$literalExpectation(text, ignoreCase) { return { type: "literal", text: text, ignoreCase: ignoreCase }; } function peg$classExpectation(parts, inverted, ignoreCase) { return { type: "class", parts: parts, inverted: inverted, ignoreCase: ignoreCase }; } function peg$anyExpectation() { return { type: "any" }; } function peg$endExpectation() { return { type: "end" }; } function peg$otherExpectation(description) { return { type: "other", description: description }; } function peg$computePosDetails(pos) { var details = peg$posDetailsCache[pos], p; if (details) { return details; } else { p = pos - 1; while (!peg$posDetailsCache[p]) { p--; } details = peg$posDetailsCache[p]; details = { line: details.line, column: details.column }; while (p < pos) { if (input.charCodeAt(p) === 10) { details.line++; details.column = 1; } else { details.column++; } p++; } peg$posDetailsCache[pos] = details; return details; } } function peg$computeLocation(startPos, endPos) { var startPosDetails = peg$computePosDetails(startPos), endPosDetails = peg$computePosDetails(endPos); return { start: { offset: startPos, line: startPosDetails.line, column: startPosDetails.column }, end: { offset: endPos, line: endPosDetails.line, column: endPosDetails.column } }; } function peg$fail(expected) { if (peg$currPos < peg$maxFailPos) { return; } if (peg$currPos > peg$maxFailPos) { peg$maxFailPos = peg$currPos; peg$maxFailExpected = []; } peg$maxFailExpected.push(expected); } function peg$buildSimpleError(message, location) { return new peg$SyntaxError(message, null, null, location); } function peg$buildStructuredError(expected, found, location) { return new peg$SyntaxError( peg$SyntaxError.buildMessage(expected, found), expected, found, location ); } function peg$parsePatternNotation_text() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parsews(); if (s1 !== peg$FAILED) { s2 = peg$parsevalue(); if (s2 !== peg$FAILED) { s3 = peg$parsews(); if (s3 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c0(s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } if (s0 === peg$FAILED) { s0 = peg$currPos; s1 = peg$parsews(); if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c1(); } s0 = s1; } return s0; } function peg$parsebegin_array() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parsews(); if (s1 !== peg$FAILED) { if (input.charCodeAt(peg$currPos) === 91) { s2 = peg$c2; peg$currPos++; } else { s2 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c3); } } if (s2 !== peg$FAILED) { s3 = peg$parsews(); if (s3 !== peg$FAILED) { s1 = [s1, s2, s3]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsebegin_object() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parsews(); if (s1 !== peg$FAILED) { if (input.charCodeAt(peg$currPos) === 123) { s2 = peg$c4; peg$currPos++; } else { s2 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c5); } } if (s2 !== peg$FAILED) { s3 = peg$parsews(); if (s3 !== peg$FAILED) { s1 = [s1, s2, s3]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parseend_array() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parsews(); if (s1 !== peg$FAILED) { if (input.charCodeAt(peg$currPos) === 93) { s2 = peg$c6; peg$currPos++; } else { s2 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c7); } } if (s2 !== peg$FAILED) { s3 = peg$parsews(); if (s3 !== peg$FAILED) { s1 = [s1, s2, s3]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parseend_object() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parsews(); if (s1 !== peg$FAILED) { if (input.charCodeAt(peg$currPos) === 125) { s2 = peg$c8; peg$currPos++; } else { s2 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c9); } } if (s2 !== peg$FAILED) { s3 = peg$parsews(); if (s3 !== peg$FAILED) { s1 = [s1, s2, s3]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsename_separator() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parsews(); if (s1 !== peg$FAILED) { if (input.charCodeAt(peg$currPos) === 58) { s2 = peg$c10; peg$currPos++; } else { s2 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c11); } } if (s2 !== peg$FAILED) { s3 = peg$parsews(); if (s3 !== peg$FAILED) { s1 = [s1, s2, s3]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsevalue_separator() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parsews(); if (s1 !== peg$FAILED) { if (input.charCodeAt(peg$currPos) === 44) { s2 = peg$c12; peg$currPos++; } else { s2 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c13); } } if (s2 !== peg$FAILED) { s3 = peg$parsews(); if (s3 !== peg$FAILED) { s1 = [s1, s2, s3]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsecomment() { var s0, s1, s2, s3; s0 = peg$currPos; if (input.charCodeAt(peg$currPos) === 35) { s1 = peg$c14; peg$currPos++; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c15); } } if (s1 !== peg$FAILED) { s2 = []; if (peg$c16.test(input.charAt(peg$currPos))) { s3 = input.charAt(peg$currPos); peg$currPos++; } else { s3 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c17); } } while (s3 !== peg$FAILED) { s2.push(s3); if (peg$c16.test(input.charAt(peg$currPos))) { s3 = input.charAt(peg$currPos); peg$currPos++; } else { s3 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c17); } } } if (s2 !== peg$FAILED) { s1 = [s1, s2]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsews() { var s0, s1; peg$silentFails++; s0 = []; s1 = peg$parsecomment(); if (s1 === peg$FAILED) { if (peg$c19.test(input.charAt(peg$currPos))) { s1 = input.charAt(peg$currPos); peg$currPos++; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c20); } } } while (s1 !== peg$FAILED) { s0.push(s1); s1 = peg$parsecomment(); if (s1 === peg$FAILED) { if (peg$c19.test(input.charAt(peg$currPos))) { s1 = input.charAt(peg$currPos); peg$currPos++; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c20); } } } } peg$silentFails--; if (s0 === peg$FAILED) { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c18); } } return s0; } function peg$parsevalue() { var s0; s0 = peg$parsefalse(); if (s0 === peg$FAILED) { s0 = peg$parsenull(); if (s0 === peg$FAILED) { s0 = peg$parsetrue(); if (s0 === peg$FAILED) { s0 = peg$parseobject(); if (s0 === peg$FAILED) { s0 = peg$parsearray(); if (s0 === peg$FAILED) { s0 = peg$parsenumber(); if (s0 === peg$FAILED) { s0 = peg$parseregex(); if (s0 === peg$FAILED) { s0 = peg$parsestring(); if (s0 === peg$FAILED) { s0 = peg$parsematcher(); } } } } } } } } return s0; } function peg$parsefalse() { var s0, s1; s0 = peg$currPos; if (input.substr(peg$currPos, 5) === peg$c21) { s1 = peg$c21; peg$currPos += 5; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c22); } } if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c23(); } s0 = s1; return s0; } function peg$parsenull() { var s0, s1; s0 = peg$currPos; if (input.substr(peg$currPos, 4) === peg$c24) { s1 = peg$c24; peg$currPos += 4; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c25); } } if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c26(); } s0 = s1; return s0; } function peg$parsetrue() { var s0, s1; s0 = peg$currPos; if (input.substr(peg$currPos, 4) === peg$c27) { s1 = peg$c27; peg$currPos += 4; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c28); } } if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c29(); } s0 = s1; return s0; } function peg$parseobject() { var s0, s1, s2, s3, s4, s5, s6, s7; s0 = peg$currPos; s1 = peg$parsebegin_object(); if (s1 !== peg$FAILED) { s2 = peg$currPos; s3 = peg$parsemember(); if (s3 !== peg$FAILED) { s4 = []; s5 = peg$currPos; s6 = peg$parsevalue_separator(); if (s6 !== peg$FAILED) { s7 = peg$parsemember(); if (s7 !== peg$FAILED) { peg$savedPos = s5; s6 = peg$c30(s3, s7); s5 = s6; } else { peg$currPos = s5; s5 = peg$FAILED; } } else { peg$currPos = s5; s5 = peg$FAILED; } while (s5 !== peg$FAILED) { s4.push(s5); s5 = peg$currPos; s6 = peg$parsevalue_separator(); if (s6 !== peg$FAILED) { s7 = peg$parsemember(); if (s7 !== peg$FAILED) { peg$savedPos = s5; s6 = peg$c30(s3, s7); s5 = s6; } else { peg$currPos = s5; s5 = peg$FAILED; } } else { peg$currPos = s5; s5 = peg$FAILED; } } if (s4 !== peg$FAILED) { s5 = peg$parsevalue_separator(); if (s5 === peg$FAILED) { s5 = null; } if (s5 !== peg$FAILED) { s6 = peg$parsesubset(); if (s6 === peg$FAILED) { s6 = null; } if (s6 !== peg$FAILED) { peg$savedPos = s2; s3 = peg$c31(s3, s4, s6); s2 = s3; } else { peg$currPos = s2; s2 = peg$FAILED; } } else { peg$currPos = s2; s2 = peg$FAILED; } } else { peg$currPos = s2; s2 = peg$FAILED; } } else { peg$currPos = s2; s2 = peg$FAILED; } if (s2 === peg$FAILED) { s2 = null; } if (s2 !== peg$FAILED) { s3 = peg$parseend_object(); if (s3 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c32(s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsemember() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parselabel(); if (s1 !== peg$FAILED) { s2 = peg$parsename_separator(); if (s2 !== peg$FAILED) { s3 = peg$parsevalue(); if (s3 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c33(s1, s3); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsearray() { var s0, s1, s2, s3, s4, s5, s6, s7; s0 = peg$currPos; s1 = peg$parsebegin_array(); if (s1 !== peg$FAILED) { s2 = peg$currPos; s3 = peg$parsevalue(); if (s3 !== peg$FAILED) { s4 = []; s5 = peg$currPos; s6 = peg$parsevalue_separator(); if (s6 !== peg$FAILED) { s7 = peg$parsevalue(); if (s7 !== peg$FAILED) { peg$savedPos = s5; s6 = peg$c34(s3, s7); s5 = s6; } else { peg$currPos = s5; s5 = peg$FAILED; } } else { peg$currPos = s5; s5 = peg$FAILED; } while (s5 !== peg$FAILED) { s4.push(s5); s5 = peg$currPos; s6 = peg$parsevalue_separator(); if (s6 !== peg$FAILED) { s7 = peg$parsevalue(); if (s7 !== peg$FAILED) { peg$savedPos = s5; s6 = peg$c34(s3, s7); s5 = s6; } else { peg$currPos = s5; s5 = peg$FAILED; } } else { peg$currPos = s5; s5 = peg$FAILED; } } if (s4 !== peg$FAILED) { s5 = peg$parsevalue_separator(); if (s5 === peg$FAILED) { s5 = null; } if (s5 !== peg$FAILED) { s6 = peg$parsesetMatch(); if (s6 === peg$FAILED) { s6 = null; } if (s6 !== peg$FAILED) { peg$savedPos = s2; s3 = peg$c35(s3, s4, s6); s2 = s3; } else { peg$currPos = s2; s2 = peg$FAILED; } } else { peg$currPos = s2; s2 = peg$FAILED; } } else { peg$currPos = s2; s2 = peg$FAILED; } } else { peg$currPos = s2; s2 = peg$FAILED; } if (s2 === peg$FAILED) { s2 = null; } if (s2 !== peg$FAILED) { s3 = peg$parseend_array(); if (s3 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c36(s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsenumber() { var s0, s1, s2, s3, s4; peg$silentFails++; s0 = peg$currPos; s1 = peg$parseminus(); if (s1 === peg$FAILED) { s1 = null; } if (s1 !== peg$FAILED) { s2 = peg$parseint(); if (s2 !== peg$FAILED) { s3 = peg$parsefrac(); if (s3 === peg$FAILED) { s3 = null; } if (s3 !== peg$FAILED) { s4 = peg$parseexp(); if (s4 === peg$FAILED) { s4 = null; } if (s4 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c38(); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } peg$silentFails--; if (s0 === peg$FAILED) { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c37); } } return s0; } function peg$parsedecimal_point() { var s0; if (input.charCodeAt(peg$currPos) === 46) { s0 = peg$c39; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c40); } } return s0; } function peg$parsedigit1_9() { var s0; if (peg$c41.test(input.charAt(peg$currPos))) { s0 = input.charAt(peg$currPos); peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c42); } } return s0; } function peg$parsee() { var s0; if (peg$c43.test(input.charAt(peg$currPos))) { s0 = input.charAt(peg$currPos); peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c44); } } return s0; } function peg$parseexp() { var s0, s1, s2, s3, s4; s0 = peg$currPos; s1 = peg$parsee(); if (s1 !== peg$FAILED) { s2 = peg$parseminus(); if (s2 === peg$FAILED) { s2 = peg$parseplus(); } if (s2 === peg$FAILED) { s2 = null; } if (s2 !== peg$FAILED) { s3 = []; s4 = peg$parseDIGIT(); if (s4 !== peg$FAILED) { while (s4 !== peg$FAILED) { s3.push(s4); s4 = peg$parseDIGIT(); } } else { s3 = peg$FAILED; } if (s3 !== peg$FAILED) { s1 = [s1, s2, s3]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsefrac() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parsedecimal_point(); if (s1 !== peg$FAILED) { s2 = []; s3 = peg$parseDIGIT(); if (s3 !== peg$FAILED) { while (s3 !== peg$FAILED) { s2.push(s3); s3 = peg$parseDIGIT(); } } else { s2 = peg$FAILED; } if (s2 !== peg$FAILED) { s1 = [s1, s2]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parseint() { var s0, s1, s2, s3; s0 = peg$parsezero(); if (s0 === peg$FAILED) { s0 = peg$currPos; s1 = peg$parsedigit1_9(); if (s1 !== peg$FAILED) { s2 = []; s3 = peg$parseDIGIT(); while (s3 !== peg$FAILED) { s2.push(s3); s3 = peg$parseDIGIT(); } if (s2 !== peg$FAILED) { s1 = [s1, s2]; s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } return s0; } function peg$parseminus() { var s0; if (input.charCodeAt(peg$currPos) === 45) { s0 = peg$c45; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c46); } } return s0; } function peg$parseplus() { var s0; if (input.charCodeAt(peg$currPos) === 43) { s0 = peg$c47; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c48); } } return s0; } function peg$parsezero() { var s0; if (input.charCodeAt(peg$currPos) === 48) { s0 = peg$c49; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c50); } } return s0; } function peg$parsestring() { var s0, s1; peg$silentFails++; s0 = peg$parsedqstring(); if (s0 === peg$FAILED) { s0 = peg$parsesqstring(); } peg$silentFails--; if (s0 === peg$FAILED) { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c51); } } return s0; } function peg$parseregex() { var s0, s1, s2, s3; peg$silentFails++; s0 = peg$currPos; s1 = peg$parserqstring(); if (s1 !== peg$FAILED) { s2 = []; s3 = peg$parsereflag(); while (s3 !== peg$FAILED) { s2.push(s3); s3 = peg$parsereflag(); } if (s2 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c53(s1, s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } peg$silentFails--; if (s0 === peg$FAILED) { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c52); } } return s0; } function peg$parsedqstring() { var s0, s1, s2, s3; peg$silentFails++; s0 = peg$currPos; s1 = peg$parsedquotation_mark(); if (s1 !== peg$FAILED) { s2 = []; s3 = peg$parsedqchar(); while (s3 !== peg$FAILED) { s2.push(s3); s3 = peg$parsedqchar(); } if (s2 !== peg$FAILED) { s3 = peg$parsedquotation_mark(); if (s3 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c55(s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } peg$silentFails--; if (s0 === peg$FAILED) { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c54); } } return s0; } function peg$parsesqstring() { var s0, s1, s2, s3; peg$silentFails++; s0 = peg$currPos; s1 = peg$parsesquotation_mark(); if (s1 !== peg$FAILED) { s2 = []; s3 = peg$parsesqchar(); while (s3 !== peg$FAILED) { s2.push(s3); s3 = peg$parsesqchar(); } if (s2 !== peg$FAILED) { s3 = peg$parsesquotation_mark(); if (s3 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c55(s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } peg$silentFails--; if (s0 === peg$FAILED) { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c56); } } return s0; } function peg$parserqstring() { var s0, s1, s2, s3; peg$silentFails++; s0 = peg$currPos; s1 = peg$parserquotation_mark(); if (s1 !== peg$FAILED) { s2 = []; s3 = peg$parserqchar(); while (s3 !== peg$FAILED) { s2.push(s3); s3 = peg$parserqchar(); } if (s2 !== peg$FAILED) { s3 = peg$parserquotation_mark(); if (s3 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c55(s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } peg$silentFails--; if (s0 === peg$FAILED) { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c57); } } return s0; } function peg$parsedqchar() { var s0, s1, s2; s0 = peg$parsedqunescaped(); if (s0 === peg$FAILED) { s0 = peg$currPos; s1 = peg$parseescape(); if (s1 !== peg$FAILED) { if (input.charCodeAt(peg$currPos) === 34) { s2 = peg$c58; peg$currPos++; } else { s2 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c59); } } if (s2 === peg$FAILED) { s2 = peg$parseno_quote_char(); } if (s2 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c60(s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } return s0; } function peg$parsesqchar() { var s0, s1, s2; s0 = peg$parsesqunescaped(); if (s0 === peg$FAILED) { s0 = peg$currPos; s1 = peg$parseescape(); if (s1 !== peg$FAILED) { if (input.charCodeAt(peg$currPos) === 39) { s2 = peg$c61; peg$currPos++; } else { s2 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c62); } } if (s2 === peg$FAILED) { s2 = peg$parseno_quote_char(); } if (s2 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c60(s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } return s0; } function peg$parserqchar() { var s0, s1, s2; s0 = peg$currPos; s1 = peg$parseescape(); if (s1 !== peg$FAILED) { if (input.charCodeAt(peg$currPos) === 47) { s2 = peg$c63; peg$currPos++; } else { s2 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c64); } } if (s2 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c65(); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } if (s0 === peg$FAILED) { s0 = peg$parserqunescaped(); } return s0; } function peg$parseno_quote_char() { var s0, s1, s2, s3, s4, s5, s6, s7; if (input.charCodeAt(peg$currPos) === 92) { s0 = peg$c66; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c67); } } if (s0 === peg$FAILED) { if (input.charCodeAt(peg$currPos) === 47) { s0 = peg$c63; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c64); } } if (s0 === peg$FAILED) { s0 = peg$currPos; if (input.charCodeAt(peg$currPos) === 98) { s1 = peg$c68; peg$currPos++; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c69); } } if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c70(); } s0 = s1; if (s0 === peg$FAILED) { s0 = peg$currPos; if (input.charCodeAt(peg$currPos) === 102) { s1 = peg$c71; peg$currPos++; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c72); } } if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c73(); } s0 = s1; if (s0 === peg$FAILED) { s0 = peg$currPos; if (input.charCodeAt(peg$currPos) === 110) { s1 = peg$c74; peg$currPos++; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c75); } } if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c76(); } s0 = s1; if (s0 === peg$FAILED) { s0 = peg$currPos; if (input.charCodeAt(peg$currPos) === 114) { s1 = peg$c77; peg$currPos++; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c78); } } if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c79(); } s0 = s1; if (s0 === peg$FAILED) { s0 = peg$currPos; if (input.charCodeAt(peg$currPos) === 116) { s1 = peg$c80; peg$currPos++; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c81); } } if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c82(); } s0 = s1; if (s0 === peg$FAILED) { s0 = peg$currPos; if (input.charCodeAt(peg$currPos) === 117) { s1 = peg$c83; peg$currPos++; } else { s1 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c84); } } if (s1 !== peg$FAILED) { s2 = peg$currPos; s3 = peg$currPos; s4 = peg$parseHEXDIG(); if (s4 !== peg$FAILED) { s5 = peg$parseHEXDIG(); if (s5 !== peg$FAILED) { s6 = peg$parseHEXDIG(); if (s6 !== peg$FAILED) { s7 = peg$parseHEXDIG(); if (s7 !== peg$FAILED) { s4 = [s4, s5, s6, s7]; s3 = s4; } else { peg$currPos = s3; s3 = peg$FAILED; } } else { peg$currPos = s3; s3 = peg$FAILED; } } else { peg$currPos = s3; s3 = peg$FAILED; } } else { peg$currPos = s3; s3 = peg$FAILED; } if (s3 !== peg$FAILED) { s2 = input.substring(s2, peg$currPos); } else { s2 = s3; } if (s2 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c85(s2); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } } } } } } } return s0; } function peg$parseescape() { var s0; if (input.charCodeAt(peg$currPos) === 92) { s0 = peg$c66; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c67); } } return s0; } function peg$parsedquotation_mark() { var s0; if (input.charCodeAt(peg$currPos) === 34) { s0 = peg$c58; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c59); } } return s0; } function peg$parsesquotation_mark() { var s0; if (input.charCodeAt(peg$currPos) === 39) { s0 = peg$c61; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c62); } } return s0; } function peg$parserquotation_mark() { var s0; if (input.charCodeAt(peg$currPos) === 47) { s0 = peg$c63; peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c64); } } return s0; } function peg$parsedqunescaped() { var s0; if (peg$c86.test(input.charAt(peg$currPos))) { s0 = input.charAt(peg$currPos); peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c87); } } return s0; } function peg$parsesqunescaped() { var s0; if (peg$c88.test(input.charAt(peg$currPos))) { s0 = input.charAt(peg$currPos); peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c89); } } return s0; } function peg$parserqunescaped() { var s0; if (peg$c90.test(input.charAt(peg$currPos))) { s0 = input.charAt(peg$currPos); peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c91); } } return s0; } function peg$parsereflag() { var s0; if (peg$c92.test(input.charAt(peg$currPos))) { s0 = input.charAt(peg$currPos); peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c93); } } return s0; } function peg$parseDIGIT() { var s0; if (peg$c94.test(input.charAt(peg$currPos))) { s0 = input.charAt(peg$currPos); peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c95); } } return s0; } function peg$parseHEXDIG() { var s0; if (peg$c96.test(input.charAt(peg$currPos))) { s0 = input.charAt(peg$currPos); peg$currPos++; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c97); } } return s0; } function peg$parselabel() { var s0; s0 = peg$parsestring(); if (s0 === peg$FAILED) { s0 = peg$parseapply(); if (s0 === peg$FAILED) { s0 = peg$parsemap(); if (s0 === peg$FAILED) { s0 = peg$parsesoloApply(); if (s0 === peg$FAILED) { s0 = peg$parsesoloMap(); if (s0 === peg$FAILED) { s0 = peg$parseidentifier(); } } } } } return s0; } function peg$parseidentifier() { var s0, s1, s2, s3; s0 = peg$currPos; s1 = peg$parsealpha(); if (s1 !== peg$FAILED) { s2 = []; s3 = peg$parsealphaNum(); while (s3 !== peg$FAILED) { s2.push(s3); s3 = peg$parsealphaNum(); } if (s2 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c98(); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parseapply() { var s0, s1, s2, s3, s4, s5; s0 = peg$currPos; s1 = peg$parseapplyPrefix(); if (s1 !== peg$FAILED) { s2 = peg$parsedot(); if (s2 !== peg$FAILED) { s3 = []; s4 = peg$parsealphaNum(); if (s4 !== peg$FAILED) { while (s4 !== peg$FAILED) { s3.push(s4); s4 = peg$parsealphaNum(); } } else { s3 = peg$FAILED; } if (s3 !== peg$FAILED) { s4 = []; s5 = peg$parsepipeArg(); while (s5 !== peg$FAILED) { s4.push(s5); s5 = peg$parsepipeArg(); } if (s4 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c99(s3, s4); s0 = s1; } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } } else { peg$currPos = s0; s0 = peg$FAILED; } return s0; } function peg$parsesoloApply() { var s0, s1; s0 = peg$currPos; s1 = peg$parseapplyPrefix(); if (s1 !== peg$FAILED) { peg$savedPos = s0; s1 = peg$c100(); } s0 = s1; return s0; } function peg$parseapplyPrefix() { var s0; if (input.substr(peg$currPos, 2) === peg$c101) { s0 = peg$c101; peg$currPos += 2; } else { s0 = peg$FAILED; if (peg$silentFails === 0) { peg$fail(peg$c102); } } return s0; } function peg$parsemap() { var s0, s1, s2, s3, s4, s5; s0 = peg$currPos; s1 = peg$parsemapPrefix(); if (s1 !== peg$FAILED) { s2 = peg$parsedot(); if (s2 !== peg$FAILED) { s3 = []; s4 = peg$parsealphaNum(); if (s4 !== peg$FAILED) { while (s4 !== peg$FAILED) { s3.push(s4); s4 = peg$parsealphaNum(); } } else { s3 = peg$FAILED; } if (s3 !== peg$FAILED) { s4 = []; s5 = peg$parsepipeArg(); while (s5 !== pe