1603 lines
41 KiB
JavaScript
1603 lines
41 KiB
JavaScript
|
// Generated by Peggy 1.2.0.
|
||
|
|
//
|
||
|
|
// https://peggyjs.org/
|
||
|
|
|
||
|
|
"use strict";
|
||
|
|
|
||
|
|
|
||
|
|
function toFixed(x) {
|
||
|
|
if (Math.abs(x) < 1.0) {
|
||
|
|
var e = parseInt(x.toString().split('e-')[1]);
|
||
|
|
if (e) {
|
||
|
|
x *= Math.pow(10,e-1);
|
||
|
|
x = '0.' + (new Array(e)).join('0') + x.toString().substring(2);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
var e = parseInt(x.toString().split('+')[1]);
|
||
|
|
if (e > 20) {
|
||
|
|
e -= 20;
|
||
|
|
x /= Math.pow(10,e);
|
||
|
|
x += (new Array(e+1)).join('0');
|
||
|
|
}
|
||
|
|
}
|
||
|
|
x = x.toString();
|
||
|
|
if(!x.includes(".")) {
|
||
|
|
x += ".";
|
||
|
|
}
|
||
|
|
return x;
|
||
|
|
}
|
||
|
|
|
||
|
|
class OpAdd {
|
||
|
|
constructor(left, right) {
|
||
|
|
this.left = left;
|
||
|
|
this.right = right;
|
||
|
|
}
|
||
|
|
gen(ctx) {
|
||
|
|
return "(" + this.left.gen(ctx) + "+" + this.right.gen(ctx) + ")";
|
||
|
|
}
|
||
|
|
reduce() {
|
||
|
|
const left = this.left.reduce();
|
||
|
|
const right = this.right.reduce();
|
||
|
|
if(left !== null && right !== null) {
|
||
|
|
return new Vec2(left.re + right.re, left.im + right.im);
|
||
|
|
} else {
|
||
|
|
if(left !== null) {
|
||
|
|
this.left = left;
|
||
|
|
} else if(right !== null) {
|
||
|
|
this.right = right;
|
||
|
|
}
|
||
|
|
return null
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
class OpSub {
|
||
|
|
constructor(left, right) {
|
||
|
|
this.left = left;
|
||
|
|
this.right = right;
|
||
|
|
}
|
||
|
|
gen(ctx) {
|
||
|
|
return "(" + this.left.gen(ctx) + "-" + this.right.gen(ctx) + ")";
|
||
|
|
}
|
||
|
|
reduce() {
|
||
|
|
const left = this.left.reduce();
|
||
|
|
const right = this.right.reduce();
|
||
|
|
if(left !== null && right !== null) {
|
||
|
|
return new Vec2(left.re - right.re, left.im - right.im);
|
||
|
|
} else {
|
||
|
|
if(left !== null) {
|
||
|
|
this.left = left;
|
||
|
|
} else if(right !== null) {
|
||
|
|
this.right = right;
|
||
|
|
}
|
||
|
|
return null
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
class OpNeg {
|
||
|
|
constructor(arg) {
|
||
|
|
this.arg = arg;
|
||
|
|
}
|
||
|
|
gen(ctx) {
|
||
|
|
return "(-(" + this.arg.gen(ctx) + "))";
|
||
|
|
}
|
||
|
|
reduce() {
|
||
|
|
const arg = this.arg.reduce();
|
||
|
|
if(arg !== null) {
|
||
|
|
return new Vec2(-arg.re, -arg.im);
|
||
|
|
} else {
|
||
|
|
return null
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
class Fn {
|
||
|
|
constructor(name, args, argoff) {
|
||
|
|
this.name = name;
|
||
|
|
this.args = args;
|
||
|
|
this.argoff = argoff;
|
||
|
|
}
|
||
|
|
gen(ctx) {
|
||
|
|
let name = this.name + "$" + this.args.length;
|
||
|
|
if(ctx[name] === undefined) {
|
||
|
|
throw "Error: the function " + this.name + " does not exist or has the wrong number of arguments";
|
||
|
|
}
|
||
|
|
if(this.argoff != null) {
|
||
|
|
name += "_o";
|
||
|
|
}
|
||
|
|
if(ctx[name] === undefined) {
|
||
|
|
throw "Error: the function " + this.name + " cannot take an argument offset";
|
||
|
|
}
|
||
|
|
let s = ctx[name] + "(";
|
||
|
|
if(this.argoff != null) {
|
||
|
|
s += toFixed(this.argoff) + ",";
|
||
|
|
}
|
||
|
|
for(const a of this.args) {
|
||
|
|
s += a.gen(ctx) + ",";
|
||
|
|
}
|
||
|
|
s = s.slice(0,-1) + ")";
|
||
|
|
return s;
|
||
|
|
}
|
||
|
|
reduce() {
|
||
|
|
for(const i in this.args) {
|
||
|
|
const a = this.args[i];
|
||
|
|
const r = a.reduce();
|
||
|
|
if(r !== null) {
|
||
|
|
this.args[i] = r;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return null;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
class Variable {
|
||
|
|
constructor(name) {
|
||
|
|
this.name = name;
|
||
|
|
}
|
||
|
|
gen(ctx) {
|
||
|
|
if(ctx[this.name] === undefined) {
|
||
|
|
throw "Error: " + this.name + " is not a variable";
|
||
|
|
}
|
||
|
|
return ctx[this.name];
|
||
|
|
}
|
||
|
|
reduce() {
|
||
|
|
return null;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
class Vec2 {
|
||
|
|
constructor(re, im) {
|
||
|
|
this.re = re;
|
||
|
|
this.im = im;
|
||
|
|
}
|
||
|
|
gen(ctx) {
|
||
|
|
return "vec2(" + toFixed(this.re) + "," + toFixed(this.im) + ")";
|
||
|
|
}
|
||
|
|
reduce() {
|
||
|
|
return this;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
class Conditional {
|
||
|
|
constructor(cond) {
|
||
|
|
this.cond = cond;
|
||
|
|
}
|
||
|
|
gen(ctx) {
|
||
|
|
let res = "";
|
||
|
|
for(const part of this.cond) {
|
||
|
|
if(part.length == 2) {
|
||
|
|
res += "(" + part[0].gen(ctx) + ").x>0.0 ? (" + part[1].gen(ctx) + ") : ";
|
||
|
|
} else {
|
||
|
|
res += part[0].gen(ctx);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return "(" + res + ")";
|
||
|
|
}
|
||
|
|
reduce() {
|
||
|
|
return null;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
function peg$subclass(child, parent) {
|
||
|
|
function C() { this.constructor = child; }
|
||
|
|
C.prototype = parent.prototype;
|
||
|
|
child.prototype = new C();
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$SyntaxError(message, expected, found, location) {
|
||
|
|
var self = Error.call(this, message);
|
||
|
|
if (Object.setPrototypeOf) {
|
||
|
|
Object.setPrototypeOf(self, peg$SyntaxError.prototype);
|
||
|
|
}
|
||
|
|
self.expected = expected;
|
||
|
|
self.found = found;
|
||
|
|
self.location = location;
|
||
|
|
self.name = "SyntaxError";
|
||
|
|
return self;
|
||
|
|
}
|
||
|
|
|
||
|
|
peg$subclass(peg$SyntaxError, Error);
|
||
|
|
|
||
|
|
function peg$padEnd(str, targetLength, padString) {
|
||
|
|
padString = padString || " ";
|
||
|
|
if (str.length > targetLength) { return str; }
|
||
|
|
targetLength -= str.length;
|
||
|
|
padString += padString.repeat(targetLength);
|
||
|
|
return str + padString.slice(0, targetLength);
|
||
|
|
}
|
||
|
|
|
||
|
|
peg$SyntaxError.prototype.format = function(sources) {
|
||
|
|
var str = "Error: " + this.message;
|
||
|
|
if (this.location) {
|
||
|
|
var src = null;
|
||
|
|
var k;
|
||
|
|
for (k = 0; k < sources.length; k++) {
|
||
|
|
if (sources[k].source === this.location.source) {
|
||
|
|
src = sources[k].text.split(/\r\n|\n|\r/g);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
var s = this.location.start;
|
||
|
|
var loc = this.location.source + ":" + s.line + ":" + s.column;
|
||
|
|
if (src) {
|
||
|
|
var e = this.location.end;
|
||
|
|
var filler = peg$padEnd("", s.line.toString().length);
|
||
|
|
var line = src[s.line - 1];
|
||
|
|
var last = s.line === e.line ? e.column : line.length + 1;
|
||
|
|
str += "\n --> " + loc + "\n"
|
||
|
|
+ filler + " |\n"
|
||
|
|
+ s.line + " | " + line + "\n"
|
||
|
|
+ filler + " | " + peg$padEnd("", s.column - 1)
|
||
|
|
+ peg$padEnd("", last - s.column, "^");
|
||
|
|
} else {
|
||
|
|
str += "\n at " + loc;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return str;
|
||
|
|
};
|
||
|
|
|
||
|
|
peg$SyntaxError.buildMessage = function(expected, found) {
|
||
|
|
var DESCRIBE_EXPECTATION_FNS = {
|
||
|
|
literal: function(expectation) {
|
||
|
|
return "\"" + literalEscape(expectation.text) + "\"";
|
||
|
|
},
|
||
|
|
|
||
|
|
class: function(expectation) {
|
||
|
|
var escapedParts = expectation.parts.map(function(part) {
|
||
|
|
return Array.isArray(part)
|
||
|
|
? classEscape(part[0]) + "-" + classEscape(part[1])
|
||
|
|
: classEscape(part);
|
||
|
|
});
|
||
|
|
|
||
|
|
return "[" + (expectation.inverted ? "^" : "") + escapedParts + "]";
|
||
|
|
},
|
||
|
|
|
||
|
|
any: function() {
|
||
|
|
return "any character";
|
||
|
|
},
|
||
|
|
|
||
|
|
end: function() {
|
||
|
|
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 = expected.map(describeExpectation);
|
||
|
|
var i, j;
|
||
|
|
|
||
|
|
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 !== undefined ? options : {};
|
||
|
|
|
||
|
|
var peg$FAILED = {};
|
||
|
|
var peg$source = options.grammarSource;
|
||
|
|
|
||
|
|
var peg$startRuleFunctions = { Level0: peg$parseLevel0 };
|
||
|
|
var peg$startRuleFunction = peg$parseLevel0;
|
||
|
|
|
||
|
|
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 = "tau";
|
||
|
|
var peg$c12 = "\u03C4";
|
||
|
|
var peg$c13 = "t";
|
||
|
|
var peg$c14 = "pi";
|
||
|
|
var peg$c15 = "\u03C0";
|
||
|
|
var peg$c16 = "p";
|
||
|
|
var peg$c17 = ",";
|
||
|
|
var peg$c18 = ":";
|
||
|
|
var peg$c19 = "i";
|
||
|
|
var peg$c20 = ".";
|
||
|
|
|
||
|
|
var peg$r0 = /^[a-zA-Z_\u221A\u0393\u03C0\u03C4\u03B3]/;
|
||
|
|
var peg$r1 = /^[+\-]/;
|
||
|
|
var peg$r2 = /^[0-9]/;
|
||
|
|
var peg$r3 = /^[ \t\n\r]/;
|
||
|
|
|
||
|
|
var peg$e0 = peg$literalExpectation("+", false);
|
||
|
|
var peg$e1 = peg$literalExpectation("-", false);
|
||
|
|
var peg$e2 = peg$literalExpectation("*", 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$literalExpectation("{", false);
|
||
|
|
var peg$e8 = peg$literalExpectation("}", false);
|
||
|
|
var peg$e9 = peg$literalExpectation("[", false);
|
||
|
|
var peg$e10 = peg$literalExpectation("]", false);
|
||
|
|
var peg$e11 = peg$literalExpectation("tau", false);
|
||
|
|
var peg$e12 = peg$literalExpectation("\u03C4", false);
|
||
|
|
var peg$e13 = peg$literalExpectation("t", false);
|
||
|
|
var peg$e14 = peg$literalExpectation("pi", false);
|
||
|
|
var peg$e15 = peg$literalExpectation("\u03C0", false);
|
||
|
|
var peg$e16 = peg$literalExpectation("p", false);
|
||
|
|
var peg$e17 = peg$literalExpectation(",", false);
|
||
|
|
var peg$e18 = peg$literalExpectation(":", false);
|
||
|
|
var peg$e19 = peg$otherExpectation("varname");
|
||
|
|
var peg$e20 = peg$classExpectation([["a", "z"], ["A", "Z"], "_", "\u221A", "\u0393", "\u03C0", "\u03C4", "\u03B3"], false, false);
|
||
|
|
var peg$e21 = peg$otherExpectation("real");
|
||
|
|
var peg$e22 = peg$otherExpectation("imag");
|
||
|
|
var peg$e23 = peg$literalExpectation("i", false);
|
||
|
|
var peg$e24 = peg$otherExpectation("number");
|
||
|
|
var peg$e25 = peg$classExpectation(["+", "-"], false, false);
|
||
|
|
var peg$e26 = peg$literalExpectation(".", false);
|
||
|
|
var peg$e27 = peg$otherExpectation("digits");
|
||
|
|
var peg$e28 = peg$classExpectation([["0", "9"]], false, false);
|
||
|
|
var peg$e29 = peg$otherExpectation("whitespace");
|
||
|
|
var peg$e30 = peg$classExpectation([" ", "\t", "\n", "\r"], false, false);
|
||
|
|
|
||
|
|
var peg$f0 = function(head, tail) {
|
||
|
|
return tail.reduce(function(result, element) {
|
||
|
|
if (element[1] === "+") { return new OpAdd(result, element[3]); }
|
||
|
|
if (element[1] === "-") { return new OpSub(result, element[3]); }
|
||
|
|
}, head);
|
||
|
|
};
|
||
|
|
var peg$f1 = function(head, tail) {
|
||
|
|
return tail.reduce(function(result, element) {
|
||
|
|
if (element[1] === "*") { return new Fn("*", [result, element[3]]); }
|
||
|
|
if (element[1] === "/") { return new Fn("/", [result, element[3]]); }
|
||
|
|
}, head);
|
||
|
|
};
|
||
|
|
var peg$f2 = function(head, tail) {
|
||
|
|
return head.reverse().reduce(function(result, element) {
|
||
|
|
return new Fn("^", [element[0], result]);
|
||
|
|
}, tail);
|
||
|
|
};
|
||
|
|
var peg$f3 = function(expr) { return expr; };
|
||
|
|
var peg$f4 = function(cond) { return new Conditional(cond); };
|
||
|
|
var peg$f5 = function(name, argoff, args) {
|
||
|
|
if(typeof(name) == "string") {
|
||
|
|
return new Fn(name, args.reverse(), argoff == null ? null : argoff[2]);
|
||
|
|
} else {
|
||
|
|
throw "Error: i is not a function";
|
||
|
|
}
|
||
|
|
};
|
||
|
|
var peg$f6 = function(name) {
|
||
|
|
if(typeof(name) == "string") {
|
||
|
|
return new Variable(name);
|
||
|
|
} else {
|
||
|
|
return name;
|
||
|
|
}
|
||
|
|
};
|
||
|
|
var peg$f7 = function(e) { return new OpNeg(e); };
|
||
|
|
var peg$f8 = function(n) {
|
||
|
|
console.log("AAA", n.re);
|
||
|
|
return n.re * 6.283185307179586;
|
||
|
|
};
|
||
|
|
var peg$f9 = function(n) {
|
||
|
|
return n.re * 3.141592653589793;
|
||
|
|
};
|
||
|
|
var peg$f10 = function(n) {
|
||
|
|
return n.re;
|
||
|
|
};
|
||
|
|
var peg$f11 = function(arg, lst) {
|
||
|
|
lst.push(arg);
|
||
|
|
return lst;
|
||
|
|
};
|
||
|
|
var peg$f12 = function(arg) { return [arg]; };
|
||
|
|
var peg$f13 = function(cond, expr, rest) { return [].concat([[cond, expr]],rest); };
|
||
|
|
var peg$f14 = function(expr) { return [[expr]]; };
|
||
|
|
var peg$f15 = function() {
|
||
|
|
if(text() === "i") {
|
||
|
|
return new Vec2(0,1);
|
||
|
|
} else {
|
||
|
|
return text();
|
||
|
|
}
|
||
|
|
};
|
||
|
|
var peg$f16 = function() {
|
||
|
|
return new Vec2(parseFloat(text()),0);
|
||
|
|
};
|
||
|
|
var peg$f17 = function() {
|
||
|
|
return new Vec2(0,parseFloat(text()));
|
||
|
|
};
|
||
|
|
|
||
|
|
var peg$currPos = 0;
|
||
|
|
var peg$savedPos = 0;
|
||
|
|
var peg$posDetailsCache = [{ line: 1, column: 1 }];
|
||
|
|
var peg$maxFailPos = 0;
|
||
|
|
var peg$maxFailExpected = [];
|
||
|
|
var peg$silentFails = 0;
|
||
|
|
|
||
|
|
var 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 offset() {
|
||
|
|
return peg$savedPos;
|
||
|
|
}
|
||
|
|
|
||
|
|
function range() {
|
||
|
|
return {
|
||
|
|
source: peg$source,
|
||
|
|
start: peg$savedPos,
|
||
|
|
end: peg$currPos
|
||
|
|
};
|
||
|
|
}
|
||
|
|
|
||
|
|
function location() {
|
||
|
|
return peg$computeLocation(peg$savedPos, peg$currPos);
|
||
|
|
}
|
||
|
|
|
||
|
|
function expected(description, location) {
|
||
|
|
location = location !== undefined
|
||
|
|
? 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 !== undefined
|
||
|
|
? 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];
|
||
|
|
var 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);
|
||
|
|
var endPosDetails = peg$computePosDetails(endPos);
|
||
|
|
|
||
|
|
return {
|
||
|
|
source: peg$source,
|
||
|
|
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$parseLevel0() {
|
||
|
|
var s0, s1, s2, s3, s4, s5, s6, s7;
|
||
|
|
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parseLevel1();
|
||
|
|
if (s1 !== peg$FAILED) {
|
||
|
|
s2 = [];
|
||
|
|
s3 = peg$currPos;
|
||
|
|
s4 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 43) {
|
||
|
|
s5 = peg$c0;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e0); }
|
||
|
|
}
|
||
|
|
if (s5 === peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 45) {
|
||
|
|
s5 = peg$c1;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e1); }
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (s5 !== peg$FAILED) {
|
||
|
|
s6 = peg$parse_();
|
||
|
|
s7 = peg$parseLevel1();
|
||
|
|
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;
|
||
|
|
}
|
||
|
|
while (s3 !== peg$FAILED) {
|
||
|
|
s2.push(s3);
|
||
|
|
s3 = peg$currPos;
|
||
|
|
s4 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 43) {
|
||
|
|
s5 = peg$c0;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e0); }
|
||
|
|
}
|
||
|
|
if (s5 === peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 45) {
|
||
|
|
s5 = peg$c1;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e1); }
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (s5 !== peg$FAILED) {
|
||
|
|
s6 = peg$parse_();
|
||
|
|
s7 = peg$parseLevel1();
|
||
|
|
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;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f0(s1, s2);
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseLevel1() {
|
||
|
|
var s0, s1, s2, s3, s4, s5, s6, s7;
|
||
|
|
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parseLevel2();
|
||
|
|
if (s1 !== peg$FAILED) {
|
||
|
|
s2 = [];
|
||
|
|
s3 = peg$currPos;
|
||
|
|
s4 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 42) {
|
||
|
|
s5 = peg$c2;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e2); }
|
||
|
|
}
|
||
|
|
if (s5 === peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 47) {
|
||
|
|
s5 = peg$c3;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e3); }
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (s5 !== peg$FAILED) {
|
||
|
|
s6 = peg$parse_();
|
||
|
|
s7 = peg$parseLevel2();
|
||
|
|
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;
|
||
|
|
}
|
||
|
|
while (s3 !== peg$FAILED) {
|
||
|
|
s2.push(s3);
|
||
|
|
s3 = peg$currPos;
|
||
|
|
s4 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 42) {
|
||
|
|
s5 = peg$c2;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e2); }
|
||
|
|
}
|
||
|
|
if (s5 === peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 47) {
|
||
|
|
s5 = peg$c3;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e3); }
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (s5 !== peg$FAILED) {
|
||
|
|
s6 = peg$parse_();
|
||
|
|
s7 = peg$parseLevel2();
|
||
|
|
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;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f1(s1, s2);
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseLevel2() {
|
||
|
|
var s0, s1, s2, s3, s4, s5, s6;
|
||
|
|
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = [];
|
||
|
|
s2 = peg$currPos;
|
||
|
|
s3 = peg$parseLevel3();
|
||
|
|
if (s3 !== peg$FAILED) {
|
||
|
|
s4 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 94) {
|
||
|
|
s5 = peg$c4;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e4); }
|
||
|
|
}
|
||
|
|
if (s5 !== peg$FAILED) {
|
||
|
|
s6 = peg$parse_();
|
||
|
|
s3 = [s3, s4, s5, s6];
|
||
|
|
s2 = s3;
|
||
|
|
} else {
|
||
|
|
peg$currPos = s2;
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s2;
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
}
|
||
|
|
while (s2 !== peg$FAILED) {
|
||
|
|
s1.push(s2);
|
||
|
|
s2 = peg$currPos;
|
||
|
|
s3 = peg$parseLevel3();
|
||
|
|
if (s3 !== peg$FAILED) {
|
||
|
|
s4 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 94) {
|
||
|
|
s5 = peg$c4;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e4); }
|
||
|
|
}
|
||
|
|
if (s5 !== peg$FAILED) {
|
||
|
|
s6 = peg$parse_();
|
||
|
|
s3 = [s3, s4, s5, s6];
|
||
|
|
s2 = s3;
|
||
|
|
} else {
|
||
|
|
peg$currPos = s2;
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s2;
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
s2 = peg$parseLevel3();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f2(s1, s2);
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseLevel3() {
|
||
|
|
var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10;
|
||
|
|
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 40) {
|
||
|
|
s2 = peg$c5;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e5); }
|
||
|
|
}
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s3 = peg$parse_();
|
||
|
|
s4 = peg$parseLevel0();
|
||
|
|
if (s4 !== peg$FAILED) {
|
||
|
|
s5 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 41) {
|
||
|
|
s6 = peg$c6;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s6 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e6); }
|
||
|
|
}
|
||
|
|
if (s6 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f3(s4);
|
||
|
|
} 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$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 123) {
|
||
|
|
s2 = peg$c7;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e7); }
|
||
|
|
}
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s3 = peg$parse_();
|
||
|
|
s4 = peg$parseConditionalInner();
|
||
|
|
if (s4 !== peg$FAILED) {
|
||
|
|
s5 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 125) {
|
||
|
|
s6 = peg$c8;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s6 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e8); }
|
||
|
|
}
|
||
|
|
if (s6 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f4(s4);
|
||
|
|
} 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$parse_();
|
||
|
|
s2 = peg$parseName();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s3 = peg$parse_();
|
||
|
|
s4 = peg$currPos;
|
||
|
|
if (input.charCodeAt(peg$currPos) === 91) {
|
||
|
|
s5 = peg$c9;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e9); }
|
||
|
|
}
|
||
|
|
if (s5 !== peg$FAILED) {
|
||
|
|
s6 = peg$parse_();
|
||
|
|
s7 = peg$parseArgOffset();
|
||
|
|
if (s7 !== peg$FAILED) {
|
||
|
|
s8 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 93) {
|
||
|
|
s9 = peg$c10;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s9 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e10); }
|
||
|
|
}
|
||
|
|
if (s9 !== peg$FAILED) {
|
||
|
|
s10 = peg$parse_();
|
||
|
|
s5 = [s5, s6, s7, s8, s9, s10];
|
||
|
|
s4 = s5;
|
||
|
|
} else {
|
||
|
|
peg$currPos = s4;
|
||
|
|
s4 = peg$FAILED;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s4;
|
||
|
|
s4 = peg$FAILED;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s4;
|
||
|
|
s4 = peg$FAILED;
|
||
|
|
}
|
||
|
|
if (s4 === peg$FAILED) {
|
||
|
|
s4 = null;
|
||
|
|
}
|
||
|
|
if (input.charCodeAt(peg$currPos) === 40) {
|
||
|
|
s5 = peg$c5;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s5 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e5); }
|
||
|
|
}
|
||
|
|
if (s5 !== peg$FAILED) {
|
||
|
|
s6 = peg$parseParameterList();
|
||
|
|
if (s6 !== peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 41) {
|
||
|
|
s7 = peg$c6;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s7 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e6); }
|
||
|
|
}
|
||
|
|
if (s7 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f5(s2, s4, s6);
|
||
|
|
} 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;
|
||
|
|
}
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parse_();
|
||
|
|
s2 = peg$parseName();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f6(s2);
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$parseImag();
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$parseReal();
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 45) {
|
||
|
|
s2 = peg$c1;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e1); }
|
||
|
|
}
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s3 = peg$parseLevel1();
|
||
|
|
if (s3 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f7(s3);
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseArgOffset() {
|
||
|
|
var s0, s1, s2, s3;
|
||
|
|
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parseReal();
|
||
|
|
if (s1 !== peg$FAILED) {
|
||
|
|
s2 = peg$parse_();
|
||
|
|
if (input.substr(peg$currPos, 3) === peg$c11) {
|
||
|
|
s3 = peg$c11;
|
||
|
|
peg$currPos += 3;
|
||
|
|
} else {
|
||
|
|
s3 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e11); }
|
||
|
|
}
|
||
|
|
if (s3 === peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 964) {
|
||
|
|
s3 = peg$c12;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s3 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e12); }
|
||
|
|
}
|
||
|
|
if (s3 === peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 116) {
|
||
|
|
s3 = peg$c13;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s3 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e13); }
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (s3 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f8(s1);
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parseReal();
|
||
|
|
if (s1 !== peg$FAILED) {
|
||
|
|
s2 = peg$parse_();
|
||
|
|
if (input.substr(peg$currPos, 2) === peg$c14) {
|
||
|
|
s3 = peg$c14;
|
||
|
|
peg$currPos += 2;
|
||
|
|
} else {
|
||
|
|
s3 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e14); }
|
||
|
|
}
|
||
|
|
if (s3 === peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 960) {
|
||
|
|
s3 = peg$c15;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s3 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e15); }
|
||
|
|
}
|
||
|
|
if (s3 === peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 112) {
|
||
|
|
s3 = peg$c16;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s3 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e16); }
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (s3 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f9(s1);
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parseReal();
|
||
|
|
if (s1 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s1 = peg$f10(s1);
|
||
|
|
}
|
||
|
|
s0 = s1;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseParameterList() {
|
||
|
|
var s0, s1, s2, s3, s4, s5;
|
||
|
|
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parse_();
|
||
|
|
s2 = peg$parseLevel0();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s3 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 44) {
|
||
|
|
s4 = peg$c17;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s4 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e17); }
|
||
|
|
}
|
||
|
|
if (s4 !== peg$FAILED) {
|
||
|
|
s5 = peg$parseParameterList();
|
||
|
|
if (s5 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f11(s2, s5);
|
||
|
|
} 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$parse_();
|
||
|
|
s2 = peg$parseLevel0();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s3 = peg$parse_();
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f12(s2);
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseConditionalInner() {
|
||
|
|
var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11;
|
||
|
|
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parse_();
|
||
|
|
s2 = peg$parseLevel0();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s3 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 58) {
|
||
|
|
s4 = peg$c18;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s4 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e18); }
|
||
|
|
}
|
||
|
|
if (s4 !== peg$FAILED) {
|
||
|
|
s5 = peg$parse_();
|
||
|
|
s6 = peg$parseLevel0();
|
||
|
|
if (s6 !== peg$FAILED) {
|
||
|
|
s7 = peg$parse_();
|
||
|
|
if (input.charCodeAt(peg$currPos) === 44) {
|
||
|
|
s8 = peg$c17;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s8 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e17); }
|
||
|
|
}
|
||
|
|
if (s8 !== peg$FAILED) {
|
||
|
|
s9 = peg$parse_();
|
||
|
|
s10 = peg$parseConditionalInner();
|
||
|
|
if (s10 !== peg$FAILED) {
|
||
|
|
s11 = peg$parse_();
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f13(s2, s6, s10);
|
||
|
|
} 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;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parse_();
|
||
|
|
s2 = peg$parseLevel0();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s3 = peg$parse_();
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f14(s2);
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseName() {
|
||
|
|
var s0, s1, s2;
|
||
|
|
|
||
|
|
peg$silentFails++;
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = [];
|
||
|
|
if (peg$r0.test(input.charAt(peg$currPos))) {
|
||
|
|
s2 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e20); }
|
||
|
|
}
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
while (s2 !== peg$FAILED) {
|
||
|
|
s1.push(s2);
|
||
|
|
if (peg$r0.test(input.charAt(peg$currPos))) {
|
||
|
|
s2 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e20); }
|
||
|
|
}
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
}
|
||
|
|
if (s1 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s1 = peg$f15();
|
||
|
|
}
|
||
|
|
s0 = s1;
|
||
|
|
peg$silentFails--;
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e19); }
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseReal() {
|
||
|
|
var s0, s1, s2;
|
||
|
|
|
||
|
|
peg$silentFails++;
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parse_();
|
||
|
|
s2 = peg$parseNumber();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f16();
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
peg$silentFails--;
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e21); }
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseImag() {
|
||
|
|
var s0, s1, s2, s3;
|
||
|
|
|
||
|
|
peg$silentFails++;
|
||
|
|
s0 = peg$currPos;
|
||
|
|
s1 = peg$parse_();
|
||
|
|
s2 = peg$parseNumber();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 105) {
|
||
|
|
s3 = peg$c19;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s3 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e23); }
|
||
|
|
}
|
||
|
|
if (s3 !== peg$FAILED) {
|
||
|
|
peg$savedPos = s0;
|
||
|
|
s0 = peg$f17();
|
||
|
|
} 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$e22); }
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseNumber() {
|
||
|
|
var s0, s1, s2, s3, s4;
|
||
|
|
|
||
|
|
peg$silentFails++;
|
||
|
|
s0 = peg$currPos;
|
||
|
|
if (peg$r1.test(input.charAt(peg$currPos))) {
|
||
|
|
s1 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e25); }
|
||
|
|
}
|
||
|
|
if (s1 === peg$FAILED) {
|
||
|
|
s1 = null;
|
||
|
|
}
|
||
|
|
s2 = peg$parseDigits();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 46) {
|
||
|
|
s3 = peg$c20;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s3 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e26); }
|
||
|
|
}
|
||
|
|
if (s3 !== peg$FAILED) {
|
||
|
|
s4 = peg$parseDigits();
|
||
|
|
if (s4 !== peg$FAILED) {
|
||
|
|
s1 = [s1, s2, 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;
|
||
|
|
}
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$currPos;
|
||
|
|
if (peg$r1.test(input.charAt(peg$currPos))) {
|
||
|
|
s1 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e25); }
|
||
|
|
}
|
||
|
|
if (s1 === peg$FAILED) {
|
||
|
|
s1 = null;
|
||
|
|
}
|
||
|
|
s2 = peg$parseDigits();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
if (input.charCodeAt(peg$currPos) === 46) {
|
||
|
|
s3 = peg$c20;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s3 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e26); }
|
||
|
|
}
|
||
|
|
if (s3 !== peg$FAILED) {
|
||
|
|
s1 = [s1, s2, s3];
|
||
|
|
s0 = s1;
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$currPos;
|
||
|
|
if (peg$r1.test(input.charAt(peg$currPos))) {
|
||
|
|
s1 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e25); }
|
||
|
|
}
|
||
|
|
if (s1 === peg$FAILED) {
|
||
|
|
s1 = null;
|
||
|
|
}
|
||
|
|
if (input.charCodeAt(peg$currPos) === 46) {
|
||
|
|
s2 = peg$c20;
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s2 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e26); }
|
||
|
|
}
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s3 = peg$parseDigits();
|
||
|
|
if (s3 !== peg$FAILED) {
|
||
|
|
s1 = [s1, s2, s3];
|
||
|
|
s0 = s1;
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s0 = peg$currPos;
|
||
|
|
if (peg$r1.test(input.charAt(peg$currPos))) {
|
||
|
|
s1 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e25); }
|
||
|
|
}
|
||
|
|
if (s1 === peg$FAILED) {
|
||
|
|
s1 = null;
|
||
|
|
}
|
||
|
|
s2 = peg$parseDigits();
|
||
|
|
if (s2 !== peg$FAILED) {
|
||
|
|
s1 = [s1, s2];
|
||
|
|
s0 = s1;
|
||
|
|
} else {
|
||
|
|
peg$currPos = s0;
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
peg$silentFails--;
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e24); }
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parseDigits() {
|
||
|
|
var s0, s1;
|
||
|
|
|
||
|
|
peg$silentFails++;
|
||
|
|
s0 = [];
|
||
|
|
if (peg$r2.test(input.charAt(peg$currPos))) {
|
||
|
|
s1 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e28); }
|
||
|
|
}
|
||
|
|
if (s1 !== peg$FAILED) {
|
||
|
|
while (s1 !== peg$FAILED) {
|
||
|
|
s0.push(s1);
|
||
|
|
if (peg$r2.test(input.charAt(peg$currPos))) {
|
||
|
|
s1 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e28); }
|
||
|
|
}
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
s0 = peg$FAILED;
|
||
|
|
}
|
||
|
|
peg$silentFails--;
|
||
|
|
if (s0 === peg$FAILED) {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e27); }
|
||
|
|
}
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
function peg$parse_() {
|
||
|
|
var s0, s1;
|
||
|
|
|
||
|
|
peg$silentFails++;
|
||
|
|
s0 = [];
|
||
|
|
if (peg$r3.test(input.charAt(peg$currPos))) {
|
||
|
|
s1 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e30); }
|
||
|
|
}
|
||
|
|
while (s1 !== peg$FAILED) {
|
||
|
|
s0.push(s1);
|
||
|
|
if (peg$r3.test(input.charAt(peg$currPos))) {
|
||
|
|
s1 = input.charAt(peg$currPos);
|
||
|
|
peg$currPos++;
|
||
|
|
} else {
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e30); }
|
||
|
|
}
|
||
|
|
}
|
||
|
|
peg$silentFails--;
|
||
|
|
s1 = peg$FAILED;
|
||
|
|
if (peg$silentFails === 0) { peg$fail(peg$e29); }
|
||
|
|
|
||
|
|
return s0;
|
||
|
|
}
|
||
|
|
|
||
|
|
peg$result = peg$startRuleFunction();
|
||
|
|
|
||
|
|
if (peg$result !== peg$FAILED && peg$currPos === input.length) {
|
||
|
|
return peg$result;
|
||
|
|
} else {
|
||
|
|
if (peg$result !== peg$FAILED && peg$currPos < input.length) {
|
||
|
|
peg$fail(peg$endExpectation());
|
||
|
|
}
|
||
|
|
|
||
|
|
throw peg$buildStructuredError(
|
||
|
|
peg$maxFailExpected,
|
||
|
|
peg$maxFailPos < input.length ? input.charAt(peg$maxFailPos) : null,
|
||
|
|
peg$maxFailPos < input.length
|
||
|
|
? peg$computeLocation(peg$maxFailPos, peg$maxFailPos + 1)
|
||
|
|
: peg$computeLocation(peg$maxFailPos, peg$maxFailPos)
|
||
|
|
);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
module.exports = {
|
||
|
|
SyntaxError: peg$SyntaxError,
|
||
|
|
parse: peg$parse
|
||
|
|
};
|