castelog
Version:
Programación JavaScript en castellano.
1,468 lines (1,306 loc) • 39.5 kB
JavaScript
/*
* Generated by PEG.js 0.10.0.
*
* http://pegjs.org/
*/
(function(root, factory) {
if (typeof define === "function" && define.amd) {
define([], factory);
} else if (typeof module === "object" && module.exports) {
module.exports = factory();
} else {
root.Castelog_xtensions_parser = factory();
}
})(this, function() {
"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$DefaultTracer() {
this.indentLevel = 0;
}
peg$DefaultTracer.prototype.trace = function(event) {
var that = this;
function log(event) {
function repeat(string, n) {
var result = "", i;
for (i = 0; i < n; i++) {
result += string;
}
return result;
}
function pad(string, length) {
return string + repeat(" ", length - string.length);
}
if (typeof console === "object") {
console.log(
event.location.start.line + ":" + event.location.start.column + "-"
+ event.location.end.line + ":" + event.location.end.column + " "
+ pad(event.type, 10) + " "
+ repeat(" ", that.indentLevel) + event.rule
);
}
}
switch (event.type) {
case "rule.enter":
log(event);
this.indentLevel++;
break;
case "rule.match":
this.indentLevel--;
log(event);
break;
case "rule.fail":
this.indentLevel--;
log(event);
break;
default:
throw new Error("Invalid event type: " + event.type + ".");
}
};
function peg$parse(input, options) {
options = options !== void 0 ? options : {};
var peg$FAILED = {},
peg$startRuleFunctions = { Sintaxis_de_calox: peg$parseSintaxis_de_calox },
peg$startRuleFunction = peg$parseSintaxis_de_calox,
peg$c0 = "Defino sintaxis",
peg$c1 = peg$literalExpectation("Defino sintaxis", false),
peg$c2 = "defino sintaxis",
peg$c3 = peg$literalExpectation("defino sintaxis", false),
peg$c4 = function(hook_id, syntax_name, syntax_content, syntax_prescript, syntax_detalles) { return { hook_id, syntax_name, syntax_content, syntax_prescript } },
peg$c5 = "de tipo",
peg$c6 = peg$literalExpectation("de tipo", false),
peg$c7 = function(nombre) {return nombre},
peg$c8 = "con nombre como",
peg$c9 = peg$literalExpectation("con nombre como", false),
peg$c10 = "con sintaxis como",
peg$c11 = peg$literalExpectation("con sintaxis como", false),
peg$c12 = function(bloque) {return bloque},
peg$c13 = "con prescript como",
peg$c14 = peg$literalExpectation("con prescript como", false),
peg$c15 = "con detalles como",
peg$c16 = peg$literalExpectation("con detalles como", false),
peg$c17 = /^[a-zA-Z$_]/,
peg$c18 = peg$classExpectation([["a", "z"], ["A", "Z"], "$", "_"], false, false),
peg$c19 = /^[a-zA-Z0-9$_]/,
peg$c20 = peg$classExpectation([["a", "z"], ["A", "Z"], ["0", "9"], "$", "_"], false, false),
peg$c21 = function() { return text() },
peg$c22 = function(palabra) {return palabra},
peg$c23 = "{",
peg$c24 = peg$literalExpectation("{", false),
peg$c25 = function(bloque) { return bloque },
peg$c26 = "\n}",
peg$c27 = peg$literalExpectation("\n}", false),
peg$c28 = function(contenido) { return contenido },
peg$c29 = peg$anyExpectation(),
peg$c30 = peg$otherExpectation("espacio"),
peg$c31 = " ",
peg$c32 = peg$literalExpectation(" ", false),
peg$c33 = "\t",
peg$c34 = peg$literalExpectation("\t", false),
peg$c35 = peg$otherExpectation("salto"),
peg$c36 = "\r\n",
peg$c37 = peg$literalExpectation("\r\n", false),
peg$c38 = "\r",
peg$c39 = peg$literalExpectation("\r", false),
peg$c40 = "\n",
peg$c41 = peg$literalExpectation("\n", false),
peg$c42 = peg$otherExpectation("fin_de_sentencia"),
peg$c43 = ".",
peg$c44 = peg$literalExpectation(".", false),
peg$currPos = 0,
peg$savedPos = 0,
peg$posDetailsCache = [{ line: 1, column: 1 }],
peg$maxFailPos = 0,
peg$maxFailExpected = [],
peg$silentFails = 0,
peg$tracer = "tracer" in options ? options.tracer : new peg$DefaultTracer(),
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$parseSintaxis_de_calox() {
var s0, s1,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Sintaxis_de_calox",
location: peg$computeLocation(startPos, startPos)
});
s0 = [];
s1 = peg$parseSentencia_de_definicion_de_sintaxis();
while (s1 !== peg$FAILED) {
s0.push(s1);
s1 = peg$parseSentencia_de_definicion_de_sintaxis();
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Sintaxis_de_calox",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Sintaxis_de_calox",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseSentencia_de_definicion_de_sintaxis() {
var s0, s1, s2, s3, s4, s5, s6, s7, s8,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Sentencia_de_definicion_de_sintaxis",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = [];
s2 = peg$parse_();
while (s2 !== peg$FAILED) {
s1.push(s2);
s2 = peg$parse_();
}
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 15) === peg$c0) {
s2 = peg$c0;
peg$currPos += 15;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c1); }
}
if (s2 === peg$FAILED) {
if (input.substr(peg$currPos, 15) === peg$c2) {
s2 = peg$c2;
peg$currPos += 15;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c3); }
}
}
if (s2 !== peg$FAILED) {
s3 = peg$parseSubsentencia_de_tipo();
if (s3 !== peg$FAILED) {
s4 = peg$parseSubsentencia_con_nombre();
if (s4 !== peg$FAILED) {
s5 = peg$parseSubsentencia_con_sintaxis();
if (s5 !== peg$FAILED) {
s6 = peg$parseSubsentencia_con_prescript();
if (s6 === peg$FAILED) {
s6 = null;
}
if (s6 !== peg$FAILED) {
s7 = peg$parseSubsentencia_con_detalles();
if (s7 === peg$FAILED) {
s7 = null;
}
if (s7 !== peg$FAILED) {
s8 = peg$parseEOS();
if (s8 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c4(s3, s4, s5, s6, s7);
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;
}
} 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) {
peg$tracer.trace({
type: "rule.match",
rule: "Sentencia_de_definicion_de_sintaxis",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Sentencia_de_definicion_de_sintaxis",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseSubsentencia_de_tipo() {
var s0, s1, s2, s3, s4,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Subsentencia_de_tipo",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = [];
s2 = peg$parse_();
while (s2 !== peg$FAILED) {
s1.push(s2);
s2 = peg$parse_();
}
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 7) === peg$c5) {
s2 = peg$c5;
peg$currPos += 7;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c6); }
}
if (s2 !== peg$FAILED) {
s3 = [];
s4 = peg$parse_();
while (s4 !== peg$FAILED) {
s3.push(s4);
s4 = peg$parse_();
}
if (s3 !== peg$FAILED) {
s4 = peg$parseNombre_de_sintaxis();
if (s4 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c7(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;
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Subsentencia_de_tipo",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Subsentencia_de_tipo",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseSubsentencia_con_nombre() {
var s0, s1, s2, s3, s4,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Subsentencia_con_nombre",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = [];
s2 = peg$parse_();
while (s2 !== peg$FAILED) {
s1.push(s2);
s2 = peg$parse_();
}
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 15) === peg$c8) {
s2 = peg$c8;
peg$currPos += 15;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c9); }
}
if (s2 !== peg$FAILED) {
s3 = [];
s4 = peg$parse_();
while (s4 !== peg$FAILED) {
s3.push(s4);
s4 = peg$parse_();
}
if (s3 !== peg$FAILED) {
s4 = peg$parseNombre_de_sintaxis();
if (s4 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c7(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;
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Subsentencia_con_nombre",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Subsentencia_con_nombre",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseSubsentencia_con_sintaxis() {
var s0, s1, s2, s3, s4,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Subsentencia_con_sintaxis",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = [];
s2 = peg$parse_();
while (s2 !== peg$FAILED) {
s1.push(s2);
s2 = peg$parse_();
}
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 17) === peg$c10) {
s2 = peg$c10;
peg$currPos += 17;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c11); }
}
if (s2 !== peg$FAILED) {
s3 = [];
s4 = peg$parse_();
while (s4 !== peg$FAILED) {
s3.push(s4);
s4 = peg$parse_();
}
if (s3 !== peg$FAILED) {
s4 = peg$parseBloque_de_codigo();
if (s4 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c12(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;
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Subsentencia_con_sintaxis",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Subsentencia_con_sintaxis",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseSubsentencia_con_prescript() {
var s0, s1, s2, s3, s4,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Subsentencia_con_prescript",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = [];
s2 = peg$parse_();
while (s2 !== peg$FAILED) {
s1.push(s2);
s2 = peg$parse_();
}
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 18) === peg$c13) {
s2 = peg$c13;
peg$currPos += 18;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c14); }
}
if (s2 !== peg$FAILED) {
s3 = [];
s4 = peg$parse_();
while (s4 !== peg$FAILED) {
s3.push(s4);
s4 = peg$parse_();
}
if (s3 !== peg$FAILED) {
s4 = peg$parseBloque_de_codigo();
if (s4 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c12(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;
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Subsentencia_con_prescript",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Subsentencia_con_prescript",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseSubsentencia_con_detalles() {
var s0, s1, s2, s3, s4,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Subsentencia_con_detalles",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = [];
s2 = peg$parse_();
while (s2 !== peg$FAILED) {
s1.push(s2);
s2 = peg$parse_();
}
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 17) === peg$c15) {
s2 = peg$c15;
peg$currPos += 17;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c16); }
}
if (s2 !== peg$FAILED) {
s3 = [];
s4 = peg$parse_();
while (s4 !== peg$FAILED) {
s3.push(s4);
s4 = peg$parse_();
}
if (s3 !== peg$FAILED) {
s4 = peg$parseBloque_de_codigo();
if (s4 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c12(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;
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Subsentencia_con_detalles",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Subsentencia_con_detalles",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parsePalabra() {
var s0, s1, s2, s3,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Palabra",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
if (peg$c17.test(input.charAt(peg$currPos))) {
s1 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c18); }
}
if (s1 !== peg$FAILED) {
s2 = [];
if (peg$c19.test(input.charAt(peg$currPos))) {
s3 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c20); }
}
if (s3 !== peg$FAILED) {
while (s3 !== peg$FAILED) {
s2.push(s3);
if (peg$c19.test(input.charAt(peg$currPos))) {
s3 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s3 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c20); }
}
}
} else {
s2 = peg$FAILED;
}
if (s2 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c21();
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Palabra",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Palabra",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseTipo_de_sintaxis() {
var s0, s1,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Tipo_de_sintaxis",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = peg$parsePalabra();
if (s1 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c22(s1);
}
s0 = s1;
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Tipo_de_sintaxis",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Tipo_de_sintaxis",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseNombre_de_sintaxis() {
var s0, s1,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Nombre_de_sintaxis",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = peg$parsePalabra();
if (s1 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c22(s1);
}
s0 = s1;
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Nombre_de_sintaxis",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Nombre_de_sintaxis",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseBloque_de_codigo() {
var s0, s1, s2,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Bloque_de_codigo",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
if (input.charCodeAt(peg$currPos) === 123) {
s1 = peg$c23;
peg$currPos++;
} else {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c24); }
}
if (s1 !== peg$FAILED) {
s2 = peg$parseHasta_cierre_de_bloque_de_codigo();
if (s2 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c25(s2);
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Bloque_de_codigo",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Bloque_de_codigo",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseHasta_cierre_de_bloque_de_codigo() {
var s0, s1, s2,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Hasta_cierre_de_bloque_de_codigo",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = peg$parseContenido_hasta_cierre_de_bloque_de_codigo();
if (s1 !== peg$FAILED) {
if (input.substr(peg$currPos, 2) === peg$c26) {
s2 = peg$c26;
peg$currPos += 2;
} else {
s2 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c27); }
}
if (s2 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c28(s1);
s0 = s1;
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
} else {
peg$currPos = s0;
s0 = peg$FAILED;
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Hasta_cierre_de_bloque_de_codigo",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Hasta_cierre_de_bloque_de_codigo",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseContenido_hasta_cierre_de_bloque_de_codigo() {
var s0, s1, s2, s3, s4,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "Contenido_hasta_cierre_de_bloque_de_codigo",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$currPos;
s1 = [];
s2 = peg$currPos;
s3 = peg$currPos;
peg$silentFails++;
if (input.substr(peg$currPos, 2) === peg$c26) {
s4 = peg$c26;
peg$currPos += 2;
} else {
s4 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c27); }
}
peg$silentFails--;
if (s4 === peg$FAILED) {
s3 = void 0;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
if (s3 !== peg$FAILED) {
if (input.length > peg$currPos) {
s4 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s4 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c29); }
}
if (s4 !== peg$FAILED) {
s3 = [s3, s4];
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$currPos;
peg$silentFails++;
if (input.substr(peg$currPos, 2) === peg$c26) {
s4 = peg$c26;
peg$currPos += 2;
} else {
s4 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c27); }
}
peg$silentFails--;
if (s4 === peg$FAILED) {
s3 = void 0;
} else {
peg$currPos = s3;
s3 = peg$FAILED;
}
if (s3 !== peg$FAILED) {
if (input.length > peg$currPos) {
s4 = input.charAt(peg$currPos);
peg$currPos++;
} else {
s4 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c29); }
}
if (s4 !== peg$FAILED) {
s3 = [s3, s4];
s2 = s3;
} else {
peg$currPos = s2;
s2 = peg$FAILED;
}
} else {
peg$currPos = s2;
s2 = peg$FAILED;
}
}
if (s1 !== peg$FAILED) {
peg$savedPos = s0;
s1 = peg$c21();
}
s0 = s1;
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "Contenido_hasta_cierre_de_bloque_de_codigo",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "Contenido_hasta_cierre_de_bloque_de_codigo",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parse_() {
var s0,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "_",
location: peg$computeLocation(startPos, startPos)
});
s0 = peg$parse__();
if (s0 === peg$FAILED) {
s0 = peg$parse___();
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "_",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "_",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parse__() {
var s0, s1,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "__",
location: peg$computeLocation(startPos, startPos)
});
peg$silentFails++;
if (input.charCodeAt(peg$currPos) === 32) {
s0 = peg$c31;
peg$currPos++;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c32); }
}
if (s0 === peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 9) {
s0 = peg$c33;
peg$currPos++;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c34); }
}
}
peg$silentFails--;
if (s0 === peg$FAILED) {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c30); }
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "__",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "__",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parse___() {
var s0, s1,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "___",
location: peg$computeLocation(startPos, startPos)
});
peg$silentFails++;
if (input.substr(peg$currPos, 2) === peg$c36) {
s0 = peg$c36;
peg$currPos += 2;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c37); }
}
if (s0 === peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 13) {
s0 = peg$c38;
peg$currPos++;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c39); }
}
if (s0 === peg$FAILED) {
if (input.charCodeAt(peg$currPos) === 10) {
s0 = peg$c40;
peg$currPos++;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c41); }
}
}
}
peg$silentFails--;
if (s0 === peg$FAILED) {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c35); }
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "___",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "___",
location: peg$computeLocation(startPos, startPos)
});
}
return s0;
}
function peg$parseEOS() {
var s0, s1,
startPos = peg$currPos;
peg$tracer.trace({
type: "rule.enter",
rule: "EOS",
location: peg$computeLocation(startPos, startPos)
});
peg$silentFails++;
if (input.charCodeAt(peg$currPos) === 46) {
s0 = peg$c43;
peg$currPos++;
} else {
s0 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c44); }
}
peg$silentFails--;
if (s0 === peg$FAILED) {
s1 = peg$FAILED;
if (peg$silentFails === 0) { peg$fail(peg$c42); }
}
if (s0 !== peg$FAILED) {
peg$tracer.trace({
type: "rule.match",
rule: "EOS",
result: s0,
location: peg$computeLocation(startPos, peg$currPos)
});
} else {
peg$tracer.trace({
type: "rule.fail",
rule: "EOS",
location: peg$computeLocation(startPos, startPos)
});
}
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)
);
}
}
return {
SyntaxError: peg$SyntaxError,
DefaultTracer: peg$DefaultTracer,
parse: peg$parse
};
});