L-Program and Godel Numbers #3
@ -39,10 +39,21 @@ body {
|
|||||||
border: 2px solid white;
|
border: 2px solid white;
|
||||||
border-radius: 0.25rem;
|
border-radius: 0.25rem;
|
||||||
padding: 1rem;
|
padding: 1rem;
|
||||||
|
flex: 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
.source-container {
|
||||||
|
display: flex;
|
||||||
|
flex-direction: row;
|
||||||
|
gap: 1rem;
|
||||||
|
height: 100%;
|
||||||
}
|
}
|
||||||
|
|
||||||
textarea {
|
textarea {
|
||||||
border-radius: 0.25rem;
|
border-radius: 0.25rem;
|
||||||
|
}
|
||||||
|
|
||||||
|
.CodeMirror {
|
||||||
height: 50vh;
|
height: 50vh;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -1,8 +1,8 @@
|
|||||||
Program = instructions: Line* {
|
Program = lines: (Line / (_/[\n]))* {
|
||||||
return { instructions: instructions };
|
return { instructions: lines.filter((line) => typeof line !== "string" || line.trim() != "") };
|
||||||
}
|
}
|
||||||
|
|
||||||
Line = instruction: (LabeledInstruction / Instruction) _ {
|
Line = _? instruction: (LabeledInstruction / Instruction) _? [\n]? {
|
||||||
return instruction;
|
return instruction;
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -16,9 +16,14 @@ Label = "[" _? label:LABEL_V _? "]" {
|
|||||||
|
|
||||||
Instruction = conditional: Conditional { return { conditional }; }
|
Instruction = conditional: Conditional { return { conditional }; }
|
||||||
/ assignment: Assignment { return { assignment }; }
|
/ assignment: Assignment { return { assignment }; }
|
||||||
|
/ goto: Goto { return { goto }; }
|
||||||
|
|
||||||
Conditional = "IF" _ variable: VAR _ "!=" _ "0" _ "GOTO" _ label: Label {
|
Goto = GOTO _ label: LABEL_V {
|
||||||
return { variable, label };
|
return { label };
|
||||||
|
}
|
||||||
|
|
||||||
|
Conditional = "IF" _ variable: VAR _? "!=" _? "0" _ goto: Goto {
|
||||||
|
return { variable, goto };
|
||||||
}
|
}
|
||||||
|
|
||||||
Assignment = variable: VAR _ "<-" _ expr: Expression {
|
Assignment = variable: VAR _ "<-" _ expr: Expression {
|
||||||
@ -30,19 +35,25 @@ Assignment = variable: VAR _ "<-" _ expr: Expression {
|
|||||||
|
|
||||||
Expression = left: VAR _ opr: OPERATION _ "1" {
|
Expression = left: VAR _ opr: OPERATION _ "1" {
|
||||||
return { left, opr };
|
return { left, opr };
|
||||||
|
} / left: VAR {
|
||||||
|
return { left };
|
||||||
}
|
}
|
||||||
|
|
||||||
VAR = symbol:"Y" { return symbol } / symbol:("X" / "Z") ind:Integer+ {
|
VAR = symbol:"Y" { return symbol } / symbol:("X" / "Z") ind:Integer+ {
|
||||||
return symbol + ind;
|
return symbol + ind;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
GOTO = "GOTO"
|
||||||
|
|
||||||
OPERATION = "+" / "-"
|
OPERATION = "+" / "-"
|
||||||
|
|
||||||
LABEL_V = symbol:[A-E] ind:Integer+ {
|
LABEL_V = symbol:END_LABEL { return symbol } / symbol:[A-E] ind:Integer+ {
|
||||||
return symbol + ind;
|
return symbol + ind;
|
||||||
}
|
}
|
||||||
|
|
||||||
Integer "integer"
|
END_LABEL = "E"
|
||||||
= _ [0-9]+ { return parseInt(text(), 10); }
|
|
||||||
|
|
||||||
_ "whitespace" = [ \t\n\r]* { }
|
Integer "integer"
|
||||||
|
= [0-9]+ { return parseInt(text(), 10); }
|
||||||
|
|
||||||
|
_ "whitespace" = [ \t]+ { }
|
||||||
|
@ -1,35 +1,46 @@
|
|||||||
<!DOCTYPE html>
|
<!doctype html>
|
||||||
<html>
|
<html>
|
||||||
<head>
|
<head>
|
||||||
<title>L-Program Compiler</title>
|
<title>Liz's L-Program Compiler</title>
|
||||||
<link rel="stylesheet" type="text/css" href="css/styles.css">
|
<link rel="stylesheet" type="text/css" href="codemirror/codemirror.css" />
|
||||||
<link rel="stylesheet" type="text/css" href=
|
<link rel="stylesheet" type="text/css" href="css/styles.css" />
|
||||||
"codemirror/codemirror.css">
|
</head>
|
||||||
</head>
|
<body>
|
||||||
<body>
|
|
||||||
<div class="container">
|
<div class="container">
|
||||||
<h1>L-Program Compiler</h1>
|
<h1>Liz's L-Program Compiler</h1>
|
||||||
<p><i>Developed for Kulyukin's CS5000</i></p>
|
<p><i>Developed for Kulyukin's CS5000</i></p>
|
||||||
<hr>
|
<hr />
|
||||||
|
<div class="source-container">
|
||||||
<div class="textarea-container">
|
<div class="textarea-container">
|
||||||
<textarea id="instructions">// asdf
|
<h3>L Source</h3>
|
||||||
q0 B 1 q1
|
<textarea id="instructions">
|
||||||
q1 1 R q1
|
// asdf
|
||||||
q1 B 1 q2
|
[ B1 ] X1 <- X1 + 1
|
||||||
q2 1 R q2
|
IF X1 != 0 GOTO B1
|
||||||
q2 B 1 f</textarea>
|
X1 <- X1
|
||||||
|
</textarea
|
||||||
|
>
|
||||||
<div>
|
<div>
|
||||||
<button id="compile">Compile</button><span style=
|
<button id="compile">Compile</button
|
||||||
"margin-left: 0.5rem" id="compile_status"></span>
|
><span style="margin-left: 0.5rem" id="compile_status"></span>
|
||||||
</div>
|
</div>
|
||||||
|
</div>
|
||||||
|
<div class="textarea-container">
|
||||||
|
<h3>Compiled JS</h3>
|
||||||
|
<textarea id="compiled"></textarea>
|
||||||
<div>
|
<div>
|
||||||
<button id="copy_state">Copy State</button>
|
<button id="eval">Eval</button
|
||||||
|
><span style="margin-left: 0.5rem" id="eval_status"></span>
|
||||||
|
</div>
|
||||||
</div>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
<script src="codemirror/codemirror.js"></script>
|
<script src="codemirror/codemirror.js"></script>
|
||||||
|
<script src="js-beautify/js-beautify.js"></script>
|
||||||
|
|
||||||
<script src="js/observable.js"></script>
|
<script src="js/observable.js"></script>
|
||||||
<script src="js/parser.js"></script>
|
<script src="js/parser.js"></script>
|
||||||
|
<script src="js/compiler.js"></script>
|
||||||
<script src="js/main.js"></script>
|
<script src="js/main.js"></script>
|
||||||
</body>
|
</body>
|
||||||
</html>
|
</html>
|
||||||
|
1
godel/js-beautify/js-beautify.js
Normal file
1
godel/js-beautify/js-beautify.js
Normal file
File diff suppressed because one or more lines are too long
163
godel/js/compiler.js
Normal file
163
godel/js/compiler.js
Normal file
@ -0,0 +1,163 @@
|
|||||||
|
class StringBuilder {
|
||||||
|
constructor() {
|
||||||
|
this.stringPieces = [];
|
||||||
|
}
|
||||||
|
add(s) {
|
||||||
|
this.stringPieces.push(s);
|
||||||
|
}
|
||||||
|
build() {
|
||||||
|
return this.stringPieces.join("");
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
const compileGoto = (gotoNode, stringBuilder) => {
|
||||||
|
stringBuilder.add(`this.followGoto("${gotoNode.label}");\nreturn;\n`);
|
||||||
|
};
|
||||||
|
|
||||||
|
const compileConditional = (conditionalNode, stringBuilder) => {
|
||||||
|
const { variable, goto: gotoNode } = conditionalNode;
|
||||||
|
|
||||||
|
stringBuilder.add(`if (this.get("${variable}") != 0) {\n`);
|
||||||
|
compileGoto(gotoNode, stringBuilder);
|
||||||
|
stringBuilder.add(`}\n`);
|
||||||
|
};
|
||||||
|
|
||||||
|
const compileAssignment = (assignmentNode, stringBuilder) => {
|
||||||
|
const { variable, expr } = assignmentNode;
|
||||||
|
if (expr.opr) {
|
||||||
|
if (expr.opr == "+") stringBuilder.add(`this.addOne("${variable}");\n`);
|
||||||
|
else if (expr.opr == "-")
|
||||||
|
stringBuilder.add(`this.subtractOne("${variable}");\n`);
|
||||||
|
} else {
|
||||||
|
stringBuilder.add("// noop \n");
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
|
const compileInstruction = (instruction, stringBuilder) => {
|
||||||
|
if (instruction.goto) {
|
||||||
|
compileGoto(instruction.goto, stringBuilder);
|
||||||
|
return; // ignore unreachable addition to instructionPointer
|
||||||
|
}
|
||||||
|
|
||||||
|
if (instruction.conditional) {
|
||||||
|
compileConditional(instruction.conditional, stringBuilder);
|
||||||
|
} else if (instruction.assignment) {
|
||||||
|
compileAssignment(instruction.assignment, stringBuilder);
|
||||||
|
}
|
||||||
|
|
||||||
|
stringBuilder.add("this.instructionPointer++;\n");
|
||||||
|
};
|
||||||
|
|
||||||
|
const compile = (ast) => {
|
||||||
|
const stringBuilder = new StringBuilder();
|
||||||
|
stringBuilder.add(`
|
||||||
|
class Program {
|
||||||
|
constructor() {
|
||||||
|
this.variables = new Map(); // variable -> natural number val
|
||||||
|
this.labelInstructions = new Map(); // labels to instruction indices
|
||||||
|
this.instructions = new Map(); // instruction indices to procedures
|
||||||
|
|
||||||
|
this.instructions.set(0, () => this.main());
|
||||||
|
this.instructionPointer = 0;
|
||||||
|
this.variables.set("Y", 0);
|
||||||
|
|
||||||
|
// -- program-specific state init --
|
||||||
|
this.finalInstruction = ${
|
||||||
|
ast.instructions.length + 1
|
||||||
|
}; // instruction of the implied "exit" label
|
||||||
|
this.labelInstructions.set("E", this.finalInstruction); // "E" is the exit label
|
||||||
|
}
|
||||||
|
|
||||||
|
get(variable) {
|
||||||
|
if (!this.variables.has(variable)) {
|
||||||
|
this.variables.set(variable, 0);
|
||||||
|
}
|
||||||
|
return this.variables.get(variable);
|
||||||
|
}
|
||||||
|
|
||||||
|
addOne(variable) {
|
||||||
|
const val = this.get(variable);
|
||||||
|
this.variables.set(variable, val + 1);
|
||||||
|
}
|
||||||
|
|
||||||
|
subtractOne(variable) {
|
||||||
|
const val = this.get(variable);
|
||||||
|
this.variables.set(variable, val - 1);
|
||||||
|
}
|
||||||
|
|
||||||
|
followGoto(label) {
|
||||||
|
this.instructionPointer = this.labelInstructions.get(label);
|
||||||
|
}
|
||||||
|
|
||||||
|
step() {
|
||||||
|
if (!this.isCompleted()) {
|
||||||
|
const procedure = this.instructions.get(this.instructionPointer);
|
||||||
|
procedure();
|
||||||
|
|
||||||
|
}
|
||||||
|
return this.instructionPointer;
|
||||||
|
}
|
||||||
|
|
||||||
|
isCompleted() {
|
||||||
|
return this.instructionPointer == this.finalInstruction;
|
||||||
|
}
|
||||||
|
|
||||||
|
getResult() {
|
||||||
|
return this.variables.get("Y");
|
||||||
|
}
|
||||||
|
|
||||||
|
run(maxIter=50000) {
|
||||||
|
let iter = 0;
|
||||||
|
while (!this.isCompleted() && (++iter) < maxIter) this.step();
|
||||||
|
if (iter < maxIter) {
|
||||||
|
return this.getResult();
|
||||||
|
}
|
||||||
|
throw new Error("Iterations went over maxIter=(" + maxIter + "). To resolve, please ask Turing how we can tell if a program will halt during compilation.");
|
||||||
|
}
|
||||||
|
|
||||||
|
main() {
|
||||||
|
`);
|
||||||
|
|
||||||
|
stringBuilder.add("// -- build label -> instruction map --\n");
|
||||||
|
for (let i = 0; i < ast.instructions.length; i++) {
|
||||||
|
const line = ast.instructions[i];
|
||||||
|
const instructionIdx = i + 1;
|
||||||
|
if (line.label) {
|
||||||
|
stringBuilder.add(
|
||||||
|
`this.instructions.set(${instructionIdx}, () => this.${line.label}());\n`,
|
||||||
|
);
|
||||||
|
stringBuilder.add(
|
||||||
|
`this.labelInstructions.set("${line.label}", ${instructionIdx});\n`,
|
||||||
|
);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
stringBuilder.add("// -- compiled instructions --\n");
|
||||||
|
for (let i = 0; i < ast.instructions.length; i++) {
|
||||||
|
let instruction = ast.instructions[i];
|
||||||
|
const instructionIdx = i + 1;
|
||||||
|
if (instruction.label) {
|
||||||
|
stringBuilder.add(
|
||||||
|
` this.followGoto("${instruction.label}");\n}\n\n${instruction.label}() {\n`,
|
||||||
|
);
|
||||||
|
stringBuilder.add(`this.instructionPointer = ${instructionIdx};\n`);
|
||||||
|
instruction = instruction.instruction;
|
||||||
|
}
|
||||||
|
|
||||||
|
compileInstruction(instruction, stringBuilder);
|
||||||
|
}
|
||||||
|
|
||||||
|
stringBuilder.add(` }\n}\n`);
|
||||||
|
stringBuilder.add("// -- \n");
|
||||||
|
stringBuilder.add("const program = new Program();\n\n");
|
||||||
|
stringBuilder.add("// set the initial Snapshot here\n");
|
||||||
|
stringBuilder.add('// program.variables.set("X1", 2);\n\n');
|
||||||
|
stringBuilder.add(
|
||||||
|
"program.run(50_000); // 50_000 is the max iterations before throwing an exception\n",
|
||||||
|
);
|
||||||
|
|
||||||
|
return js_beautify(stringBuilder.build(), {
|
||||||
|
indent_size: 2,
|
||||||
|
wrap_line_length: 120,
|
||||||
|
});
|
||||||
|
};
|
120
godel/js/main.js
120
godel/js/main.js
@ -1,5 +1,121 @@
|
|||||||
const MESSAGES = {};
|
const MESSAGES = {
|
||||||
|
COMPILE: "COMPILE",
|
||||||
|
COMPILE_RESULT: "COMPILE_RESULT",
|
||||||
|
EVAL: "EVAL",
|
||||||
|
EVAL_STATUS: "EVAL_RESULT",
|
||||||
|
};
|
||||||
|
|
||||||
// -- the "real" code
|
// -- the "real" code --
|
||||||
|
|
||||||
const state = new Observable();
|
const state = new Observable();
|
||||||
|
|
||||||
|
const prepareSource = (text) => text.replaceAll(/\/\/.*/g, "").trim();
|
||||||
|
|
||||||
|
const main = () => {
|
||||||
|
let program;
|
||||||
|
|
||||||
|
state.subscribe((msg) => {
|
||||||
|
if (msg.type == MESSAGES.COMPILE) {
|
||||||
|
const { value } = msg;
|
||||||
|
const source = prepareSource(value);
|
||||||
|
try {
|
||||||
|
const ast = parser.parse(source);
|
||||||
|
const program = compile(ast);
|
||||||
|
|
||||||
|
state.notify({
|
||||||
|
type: MESSAGES.COMPILE_RESULT,
|
||||||
|
value: program,
|
||||||
|
});
|
||||||
|
} catch (e) {
|
||||||
|
state.notify({
|
||||||
|
type: MESSAGES.COMPILE_RESULT,
|
||||||
|
error: e.toString(),
|
||||||
|
});
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if (msg.type == MESSAGES.EVAL) {
|
||||||
|
const source = compiledEditorEl.getValue();
|
||||||
|
try {
|
||||||
|
const result = eval(source);
|
||||||
|
state.notify({
|
||||||
|
type: MESSAGES.EVAL_RESULT,
|
||||||
|
value: result,
|
||||||
|
});
|
||||||
|
} catch (e) {
|
||||||
|
state.notify({
|
||||||
|
type: MESSAGES.EVAL_RESULT,
|
||||||
|
error: e.toString(),
|
||||||
|
});
|
||||||
|
}
|
||||||
|
}
|
||||||
|
});
|
||||||
|
};
|
||||||
|
main();
|
||||||
|
|
||||||
|
// -- a bit of some hacky ui code --
|
||||||
|
|
||||||
|
const instructionsEl = document.getElementById("instructions");
|
||||||
|
const instructionsEditorEl = CodeMirror.fromTextArea(instructionsEl, {
|
||||||
|
lineNumbers: true,
|
||||||
|
});
|
||||||
|
|
||||||
|
const compileButton = document.getElementById("compile");
|
||||||
|
const evalButton = document.getElementById("eval");
|
||||||
|
const evalStatusEl = document.getElementById("eval_status");
|
||||||
|
const compileStatusEl = document.getElementById("compile_status");
|
||||||
|
const compiledEl = document.getElementById("compiled");
|
||||||
|
const compiledEditorEl = CodeMirror.fromTextArea(compiledEl, {
|
||||||
|
lineNumbers: true,
|
||||||
|
});
|
||||||
|
state.subscribe((msg) => {
|
||||||
|
if (msg.type == MESSAGES.COMPILE_RESULT) {
|
||||||
|
evalStatusEl.classList.remove("error");
|
||||||
|
evalStatusEl.classList.remove("success");
|
||||||
|
evalStatusEl.innerHTML = "";
|
||||||
|
|
||||||
|
if (typeof msg.value !== "undefined") {
|
||||||
|
compiledEditorEl.setValue(msg.value);
|
||||||
|
|
||||||
|
compileStatusEl.classList.add("success");
|
||||||
|
compileStatusEl.classList.remove("error");
|
||||||
|
compileStatusEl.innerHTML = `Successful compile at ${new Date().toLocaleString()}!`;
|
||||||
|
} else if (msg.error) {
|
||||||
|
compiledEditorEl.setValue("");
|
||||||
|
|
||||||
|
compileStatusEl.classList.remove("success");
|
||||||
|
compileStatusEl.classList.add("error");
|
||||||
|
compileStatusEl.innerHTML = msg.error;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
});
|
||||||
|
state.subscribe((msg) => {
|
||||||
|
if (msg.type == MESSAGES.EVAL_RESULT) {
|
||||||
|
if (typeof msg.value !== "undefined") {
|
||||||
|
evalStatusEl.classList.add("success");
|
||||||
|
evalStatusEl.classList.remove("error");
|
||||||
|
evalStatusEl.innerHTML = `Result: ${msg.value}`;
|
||||||
|
} else if (msg.error) {
|
||||||
|
evalStatusEl.classList.remove("success");
|
||||||
|
evalStatusEl.classList.add("error");
|
||||||
|
evalStatusEl.innerHTML = msg.error;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
});
|
||||||
|
|
||||||
|
const urlParams = new URLSearchParams(window.location.search);
|
||||||
|
if (urlParams.get("instructions")) {
|
||||||
|
editorEl.setValue(atob(urlParams.get("instructions")));
|
||||||
|
}
|
||||||
|
|
||||||
|
compileButton.addEventListener("click", () => {
|
||||||
|
state.notify({
|
||||||
|
type: MESSAGES.COMPILE,
|
||||||
|
value: instructionsEditorEl.getValue(),
|
||||||
|
});
|
||||||
|
});
|
||||||
|
|
||||||
|
evalButton.addEventListener("click", () => {
|
||||||
|
state.notify({
|
||||||
|
type: MESSAGES.EVAL,
|
||||||
|
});
|
||||||
|
});
|
||||||
|
@ -1,4 +1,4 @@
|
|||||||
module.exports = /*
|
parser = /*
|
||||||
* Generated by PEG.js 0.10.0.
|
* Generated by PEG.js 0.10.0.
|
||||||
*
|
*
|
||||||
* http://pegjs.org/
|
* http://pegjs.org/
|
||||||
@ -141,72 +141,83 @@ module.exports = /*
|
|||||||
peg$startRuleFunctions = { Program: peg$parseProgram },
|
peg$startRuleFunctions = { Program: peg$parseProgram },
|
||||||
peg$startRuleFunction = peg$parseProgram,
|
peg$startRuleFunction = peg$parseProgram,
|
||||||
|
|
||||||
peg$c0 = function(instructions) {
|
peg$c0 = /^[\n]/,
|
||||||
return { instructions: instructions };
|
peg$c1 = peg$classExpectation(["\n"], false, false),
|
||||||
|
peg$c2 = function(lines) {
|
||||||
|
return { instructions: lines.filter((line) => typeof line !== "string" || line.trim() != "") };
|
||||||
},
|
},
|
||||||
peg$c1 = function(instruction) {
|
peg$c3 = function(instruction) {
|
||||||
return instruction;
|
return instruction;
|
||||||
},
|
},
|
||||||
peg$c2 = function(label, instruction) {
|
peg$c4 = function(label, instruction) {
|
||||||
return { label, instruction };
|
return { label, instruction };
|
||||||
},
|
},
|
||||||
peg$c3 = "[",
|
peg$c5 = "[",
|
||||||
peg$c4 = peg$literalExpectation("[", false),
|
peg$c6 = peg$literalExpectation("[", false),
|
||||||
peg$c5 = "]",
|
peg$c7 = "]",
|
||||||
peg$c6 = peg$literalExpectation("]", false),
|
peg$c8 = peg$literalExpectation("]", false),
|
||||||
peg$c7 = function(label) {
|
peg$c9 = function(label) {
|
||||||
return label;
|
return label;
|
||||||
},
|
},
|
||||||
peg$c8 = function(conditional) { return { conditional }; },
|
peg$c10 = function(conditional) { return { conditional }; },
|
||||||
peg$c9 = function(assignment) { return { assignment }; },
|
peg$c11 = function(assignment) { return { assignment }; },
|
||||||
peg$c10 = "IF",
|
peg$c12 = function(goto) { return { goto }; },
|
||||||
peg$c11 = peg$literalExpectation("IF", false),
|
peg$c13 = function(label) {
|
||||||
peg$c12 = "!=",
|
return { label };
|
||||||
peg$c13 = peg$literalExpectation("!=", false),
|
|
||||||
peg$c14 = "0",
|
|
||||||
peg$c15 = peg$literalExpectation("0", false),
|
|
||||||
peg$c16 = "GOTO",
|
|
||||||
peg$c17 = peg$literalExpectation("GOTO", false),
|
|
||||||
peg$c18 = function(variable, label) {
|
|
||||||
return { variable, label };
|
|
||||||
},
|
},
|
||||||
peg$c19 = "<-",
|
peg$c14 = "IF",
|
||||||
peg$c20 = peg$literalExpectation("<-", false),
|
peg$c15 = peg$literalExpectation("IF", false),
|
||||||
peg$c21 = function(variable, expr) {
|
peg$c16 = "!=",
|
||||||
|
peg$c17 = peg$literalExpectation("!=", false),
|
||||||
|
peg$c18 = "0",
|
||||||
|
peg$c19 = peg$literalExpectation("0", false),
|
||||||
|
peg$c20 = function(variable, goto) {
|
||||||
|
return { variable, goto };
|
||||||
|
},
|
||||||
|
peg$c21 = "<-",
|
||||||
|
peg$c22 = peg$literalExpectation("<-", false),
|
||||||
|
peg$c23 = function(variable, expr) {
|
||||||
if (expr.left != variable) {
|
if (expr.left != variable) {
|
||||||
error("left hand variable must match right hand");
|
error("left hand variable must match right hand");
|
||||||
}
|
}
|
||||||
return { variable, expr };
|
return { variable, expr };
|
||||||
},
|
},
|
||||||
peg$c22 = "1",
|
peg$c24 = "1",
|
||||||
peg$c23 = peg$literalExpectation("1", false),
|
peg$c25 = peg$literalExpectation("1", false),
|
||||||
peg$c24 = function(left, opr) {
|
peg$c26 = function(left, opr) {
|
||||||
return { left, opr };
|
return { left, opr };
|
||||||
},
|
},
|
||||||
peg$c25 = "Y",
|
peg$c27 = function(left) {
|
||||||
peg$c26 = peg$literalExpectation("Y", false),
|
return { left };
|
||||||
peg$c27 = function(symbol) { return symbol },
|
},
|
||||||
peg$c28 = "X",
|
peg$c28 = "Y",
|
||||||
peg$c29 = peg$literalExpectation("X", false),
|
peg$c29 = peg$literalExpectation("Y", false),
|
||||||
peg$c30 = "Z",
|
peg$c30 = function(symbol) { return symbol },
|
||||||
peg$c31 = peg$literalExpectation("Z", false),
|
peg$c31 = "X",
|
||||||
peg$c32 = function(symbol, ind) {
|
peg$c32 = peg$literalExpectation("X", false),
|
||||||
|
peg$c33 = "Z",
|
||||||
|
peg$c34 = peg$literalExpectation("Z", false),
|
||||||
|
peg$c35 = function(symbol, ind) {
|
||||||
return symbol + ind;
|
return symbol + ind;
|
||||||
},
|
},
|
||||||
peg$c33 = "+",
|
peg$c36 = "GOTO",
|
||||||
peg$c34 = peg$literalExpectation("+", false),
|
peg$c37 = peg$literalExpectation("GOTO", false),
|
||||||
peg$c35 = "-",
|
peg$c38 = "+",
|
||||||
peg$c36 = peg$literalExpectation("-", false),
|
peg$c39 = peg$literalExpectation("+", false),
|
||||||
peg$c37 = /^[A-E]/,
|
peg$c40 = "-",
|
||||||
peg$c38 = peg$classExpectation([["A", "E"]], false, false),
|
peg$c41 = peg$literalExpectation("-", false),
|
||||||
peg$c39 = peg$otherExpectation("integer"),
|
peg$c42 = /^[A-E]/,
|
||||||
peg$c40 = /^[0-9]/,
|
peg$c43 = peg$classExpectation([["A", "E"]], false, false),
|
||||||
peg$c41 = peg$classExpectation([["0", "9"]], false, false),
|
peg$c44 = "E",
|
||||||
peg$c42 = function() { return parseInt(text(), 10); },
|
peg$c45 = peg$literalExpectation("E", false),
|
||||||
peg$c43 = peg$otherExpectation("whitespace"),
|
peg$c46 = peg$otherExpectation("integer"),
|
||||||
peg$c44 = /^[ \t\n\r]/,
|
peg$c47 = /^[0-9]/,
|
||||||
peg$c45 = peg$classExpectation([" ", "\t", "\n", "\r"], false, false),
|
peg$c48 = peg$classExpectation([["0", "9"]], false, false),
|
||||||
peg$c46 = function() { },
|
peg$c49 = function() { return parseInt(text(), 10); },
|
||||||
|
peg$c50 = peg$otherExpectation("whitespace"),
|
||||||
|
peg$c51 = /^[ \t]/,
|
||||||
|
peg$c52 = peg$classExpectation([" ", "\t"], false, false),
|
||||||
|
peg$c53 = function() { },
|
||||||
|
|
||||||
peg$currPos = 0,
|
peg$currPos = 0,
|
||||||
peg$savedPos = 0,
|
peg$savedPos = 0,
|
||||||
@ -350,13 +361,37 @@ module.exports = /*
|
|||||||
s0 = peg$currPos;
|
s0 = peg$currPos;
|
||||||
s1 = [];
|
s1 = [];
|
||||||
s2 = peg$parseLine();
|
s2 = peg$parseLine();
|
||||||
|
if (s2 === peg$FAILED) {
|
||||||
|
s2 = peg$parse_();
|
||||||
|
if (s2 === peg$FAILED) {
|
||||||
|
if (peg$c0.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c1); }
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
while (s2 !== peg$FAILED) {
|
while (s2 !== peg$FAILED) {
|
||||||
s1.push(s2);
|
s1.push(s2);
|
||||||
s2 = peg$parseLine();
|
s2 = peg$parseLine();
|
||||||
|
if (s2 === peg$FAILED) {
|
||||||
|
s2 = peg$parse_();
|
||||||
|
if (s2 === peg$FAILED) {
|
||||||
|
if (peg$c0.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c1); }
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
}
|
}
|
||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c0(s1);
|
s1 = peg$c2(s1);
|
||||||
}
|
}
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
|
|
||||||
@ -364,18 +399,37 @@ module.exports = /*
|
|||||||
}
|
}
|
||||||
|
|
||||||
function peg$parseLine() {
|
function peg$parseLine() {
|
||||||
var s0, s1, s2;
|
var s0, s1, s2, s3, s4;
|
||||||
|
|
||||||
s0 = peg$currPos;
|
s0 = peg$currPos;
|
||||||
s1 = peg$parseLabeledInstruction();
|
s1 = peg$parse_();
|
||||||
if (s1 === peg$FAILED) {
|
if (s1 === peg$FAILED) {
|
||||||
s1 = peg$parseInstruction();
|
s1 = null;
|
||||||
}
|
}
|
||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
s2 = peg$parse_();
|
s2 = peg$parseLabeledInstruction();
|
||||||
|
if (s2 === peg$FAILED) {
|
||||||
|
s2 = peg$parseInstruction();
|
||||||
|
}
|
||||||
if (s2 !== peg$FAILED) {
|
if (s2 !== peg$FAILED) {
|
||||||
|
s3 = peg$parse_();
|
||||||
|
if (s3 === peg$FAILED) {
|
||||||
|
s3 = null;
|
||||||
|
}
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
if (peg$c0.test(input.charAt(peg$currPos))) {
|
||||||
|
s4 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s4 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c1); }
|
||||||
|
}
|
||||||
|
if (s4 === peg$FAILED) {
|
||||||
|
s4 = null;
|
||||||
|
}
|
||||||
|
if (s4 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c1(s1);
|
s1 = peg$c3(s2);
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
} else {
|
} else {
|
||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
@ -385,6 +439,14 @@ module.exports = /*
|
|||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
s0 = peg$FAILED;
|
s0 = peg$FAILED;
|
||||||
}
|
}
|
||||||
|
} else {
|
||||||
|
peg$currPos = s0;
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
peg$currPos = s0;
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
}
|
||||||
|
|
||||||
return s0;
|
return s0;
|
||||||
}
|
}
|
||||||
@ -400,7 +462,7 @@ module.exports = /*
|
|||||||
s3 = peg$parseInstruction();
|
s3 = peg$parseInstruction();
|
||||||
if (s3 !== peg$FAILED) {
|
if (s3 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c2(s1, s3);
|
s1 = peg$c4(s1, s3);
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
} else {
|
} else {
|
||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
@ -423,11 +485,11 @@ module.exports = /*
|
|||||||
|
|
||||||
s0 = peg$currPos;
|
s0 = peg$currPos;
|
||||||
if (input.charCodeAt(peg$currPos) === 91) {
|
if (input.charCodeAt(peg$currPos) === 91) {
|
||||||
s1 = peg$c3;
|
s1 = peg$c5;
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s1 = peg$FAILED;
|
s1 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c4); }
|
if (peg$silentFails === 0) { peg$fail(peg$c6); }
|
||||||
}
|
}
|
||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
s2 = peg$parse_();
|
s2 = peg$parse_();
|
||||||
@ -443,15 +505,15 @@ module.exports = /*
|
|||||||
}
|
}
|
||||||
if (s4 !== peg$FAILED) {
|
if (s4 !== peg$FAILED) {
|
||||||
if (input.charCodeAt(peg$currPos) === 93) {
|
if (input.charCodeAt(peg$currPos) === 93) {
|
||||||
s5 = peg$c5;
|
s5 = peg$c7;
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s5 = peg$FAILED;
|
s5 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c6); }
|
if (peg$silentFails === 0) { peg$fail(peg$c8); }
|
||||||
}
|
}
|
||||||
if (s5 !== peg$FAILED) {
|
if (s5 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c7(s3);
|
s1 = peg$c9(s3);
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
} else {
|
} else {
|
||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
@ -484,7 +546,7 @@ module.exports = /*
|
|||||||
s1 = peg$parseConditional();
|
s1 = peg$parseConditional();
|
||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c8(s1);
|
s1 = peg$c10(s1);
|
||||||
}
|
}
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
if (s0 === peg$FAILED) {
|
if (s0 === peg$FAILED) {
|
||||||
@ -492,24 +554,62 @@ module.exports = /*
|
|||||||
s1 = peg$parseAssignment();
|
s1 = peg$parseAssignment();
|
||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c9(s1);
|
s1 = peg$c11(s1);
|
||||||
}
|
}
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
|
if (s0 === peg$FAILED) {
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = peg$parseGoto();
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c12(s1);
|
||||||
|
}
|
||||||
|
s0 = s1;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseGoto() {
|
||||||
|
var s0, s1, s2, s3;
|
||||||
|
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = peg$parseGOTO();
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
s2 = peg$parse_();
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
|
s3 = peg$parseLABEL_V();
|
||||||
|
if (s3 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c13(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;
|
return s0;
|
||||||
}
|
}
|
||||||
|
|
||||||
function peg$parseConditional() {
|
function peg$parseConditional() {
|
||||||
var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9, s10, s11;
|
var s0, s1, s2, s3, s4, s5, s6, s7, s8, s9;
|
||||||
|
|
||||||
s0 = peg$currPos;
|
s0 = peg$currPos;
|
||||||
if (input.substr(peg$currPos, 2) === peg$c10) {
|
if (input.substr(peg$currPos, 2) === peg$c14) {
|
||||||
s1 = peg$c10;
|
s1 = peg$c14;
|
||||||
peg$currPos += 2;
|
peg$currPos += 2;
|
||||||
} else {
|
} else {
|
||||||
s1 = peg$FAILED;
|
s1 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c11); }
|
if (peg$silentFails === 0) { peg$fail(peg$c15); }
|
||||||
}
|
}
|
||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
s2 = peg$parse_();
|
s2 = peg$parse_();
|
||||||
@ -517,41 +617,37 @@ module.exports = /*
|
|||||||
s3 = peg$parseVAR();
|
s3 = peg$parseVAR();
|
||||||
if (s3 !== peg$FAILED) {
|
if (s3 !== peg$FAILED) {
|
||||||
s4 = peg$parse_();
|
s4 = peg$parse_();
|
||||||
|
if (s4 === peg$FAILED) {
|
||||||
|
s4 = null;
|
||||||
|
}
|
||||||
if (s4 !== peg$FAILED) {
|
if (s4 !== peg$FAILED) {
|
||||||
if (input.substr(peg$currPos, 2) === peg$c12) {
|
if (input.substr(peg$currPos, 2) === peg$c16) {
|
||||||
s5 = peg$c12;
|
s5 = peg$c16;
|
||||||
peg$currPos += 2;
|
peg$currPos += 2;
|
||||||
} else {
|
} else {
|
||||||
s5 = peg$FAILED;
|
s5 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c13); }
|
if (peg$silentFails === 0) { peg$fail(peg$c17); }
|
||||||
}
|
}
|
||||||
if (s5 !== peg$FAILED) {
|
if (s5 !== peg$FAILED) {
|
||||||
s6 = peg$parse_();
|
s6 = peg$parse_();
|
||||||
|
if (s6 === peg$FAILED) {
|
||||||
|
s6 = null;
|
||||||
|
}
|
||||||
if (s6 !== peg$FAILED) {
|
if (s6 !== peg$FAILED) {
|
||||||
if (input.charCodeAt(peg$currPos) === 48) {
|
if (input.charCodeAt(peg$currPos) === 48) {
|
||||||
s7 = peg$c14;
|
s7 = peg$c18;
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s7 = peg$FAILED;
|
s7 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c15); }
|
if (peg$silentFails === 0) { peg$fail(peg$c19); }
|
||||||
}
|
}
|
||||||
if (s7 !== peg$FAILED) {
|
if (s7 !== peg$FAILED) {
|
||||||
s8 = peg$parse_();
|
s8 = peg$parse_();
|
||||||
if (s8 !== peg$FAILED) {
|
if (s8 !== peg$FAILED) {
|
||||||
if (input.substr(peg$currPos, 4) === peg$c16) {
|
s9 = peg$parseGoto();
|
||||||
s9 = peg$c16;
|
|
||||||
peg$currPos += 4;
|
|
||||||
} else {
|
|
||||||
s9 = peg$FAILED;
|
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c17); }
|
|
||||||
}
|
|
||||||
if (s9 !== peg$FAILED) {
|
if (s9 !== peg$FAILED) {
|
||||||
s10 = peg$parse_();
|
|
||||||
if (s10 !== peg$FAILED) {
|
|
||||||
s11 = peg$parseLabel();
|
|
||||||
if (s11 !== peg$FAILED) {
|
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c18(s3, s11);
|
s1 = peg$c20(s3, s9);
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
} else {
|
} else {
|
||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
@ -589,14 +685,6 @@ module.exports = /*
|
|||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
s0 = peg$FAILED;
|
s0 = peg$FAILED;
|
||||||
}
|
}
|
||||||
} else {
|
|
||||||
peg$currPos = s0;
|
|
||||||
s0 = peg$FAILED;
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
peg$currPos = s0;
|
|
||||||
s0 = peg$FAILED;
|
|
||||||
}
|
|
||||||
|
|
||||||
return s0;
|
return s0;
|
||||||
}
|
}
|
||||||
@ -609,12 +697,12 @@ module.exports = /*
|
|||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
s2 = peg$parse_();
|
s2 = peg$parse_();
|
||||||
if (s2 !== peg$FAILED) {
|
if (s2 !== peg$FAILED) {
|
||||||
if (input.substr(peg$currPos, 2) === peg$c19) {
|
if (input.substr(peg$currPos, 2) === peg$c21) {
|
||||||
s3 = peg$c19;
|
s3 = peg$c21;
|
||||||
peg$currPos += 2;
|
peg$currPos += 2;
|
||||||
} else {
|
} else {
|
||||||
s3 = peg$FAILED;
|
s3 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c20); }
|
if (peg$silentFails === 0) { peg$fail(peg$c22); }
|
||||||
}
|
}
|
||||||
if (s3 !== peg$FAILED) {
|
if (s3 !== peg$FAILED) {
|
||||||
s4 = peg$parse_();
|
s4 = peg$parse_();
|
||||||
@ -622,7 +710,7 @@ module.exports = /*
|
|||||||
s5 = peg$parseExpression();
|
s5 = peg$parseExpression();
|
||||||
if (s5 !== peg$FAILED) {
|
if (s5 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c21(s1, s5);
|
s1 = peg$c23(s1, s5);
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
} else {
|
} else {
|
||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
@ -661,15 +749,15 @@ module.exports = /*
|
|||||||
s4 = peg$parse_();
|
s4 = peg$parse_();
|
||||||
if (s4 !== peg$FAILED) {
|
if (s4 !== peg$FAILED) {
|
||||||
if (input.charCodeAt(peg$currPos) === 49) {
|
if (input.charCodeAt(peg$currPos) === 49) {
|
||||||
s5 = peg$c22;
|
s5 = peg$c24;
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s5 = peg$FAILED;
|
s5 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c23); }
|
if (peg$silentFails === 0) { peg$fail(peg$c25); }
|
||||||
}
|
}
|
||||||
if (s5 !== peg$FAILED) {
|
if (s5 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c24(s1, s3);
|
s1 = peg$c26(s1, s3);
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
} else {
|
} else {
|
||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
@ -691,6 +779,15 @@ module.exports = /*
|
|||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
s0 = peg$FAILED;
|
s0 = peg$FAILED;
|
||||||
}
|
}
|
||||||
|
if (s0 === peg$FAILED) {
|
||||||
|
s0 = peg$currPos;
|
||||||
|
s1 = peg$parseVAR();
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c27(s1);
|
||||||
|
}
|
||||||
|
s0 = s1;
|
||||||
|
}
|
||||||
|
|
||||||
return s0;
|
return s0;
|
||||||
}
|
}
|
||||||
@ -700,33 +797,33 @@ module.exports = /*
|
|||||||
|
|
||||||
s0 = peg$currPos;
|
s0 = peg$currPos;
|
||||||
if (input.charCodeAt(peg$currPos) === 89) {
|
if (input.charCodeAt(peg$currPos) === 89) {
|
||||||
s1 = peg$c25;
|
|
||||||
peg$currPos++;
|
|
||||||
} else {
|
|
||||||
s1 = peg$FAILED;
|
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c26); }
|
|
||||||
}
|
|
||||||
if (s1 !== peg$FAILED) {
|
|
||||||
peg$savedPos = s0;
|
|
||||||
s1 = peg$c27(s1);
|
|
||||||
}
|
|
||||||
s0 = s1;
|
|
||||||
if (s0 === peg$FAILED) {
|
|
||||||
s0 = peg$currPos;
|
|
||||||
if (input.charCodeAt(peg$currPos) === 88) {
|
|
||||||
s1 = peg$c28;
|
s1 = peg$c28;
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s1 = peg$FAILED;
|
s1 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c29); }
|
if (peg$silentFails === 0) { peg$fail(peg$c29); }
|
||||||
}
|
}
|
||||||
if (s1 === peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
if (input.charCodeAt(peg$currPos) === 90) {
|
peg$savedPos = s0;
|
||||||
s1 = peg$c30;
|
s1 = peg$c30(s1);
|
||||||
|
}
|
||||||
|
s0 = s1;
|
||||||
|
if (s0 === peg$FAILED) {
|
||||||
|
s0 = peg$currPos;
|
||||||
|
if (input.charCodeAt(peg$currPos) === 88) {
|
||||||
|
s1 = peg$c31;
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s1 = peg$FAILED;
|
s1 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c31); }
|
if (peg$silentFails === 0) { peg$fail(peg$c32); }
|
||||||
|
}
|
||||||
|
if (s1 === peg$FAILED) {
|
||||||
|
if (input.charCodeAt(peg$currPos) === 90) {
|
||||||
|
s1 = peg$c33;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c34); }
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
@ -742,7 +839,7 @@ module.exports = /*
|
|||||||
}
|
}
|
||||||
if (s2 !== peg$FAILED) {
|
if (s2 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c32(s1, s2);
|
s1 = peg$c35(s1, s2);
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
} else {
|
} else {
|
||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
@ -757,23 +854,37 @@ module.exports = /*
|
|||||||
return s0;
|
return s0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
function peg$parseGOTO() {
|
||||||
|
var s0;
|
||||||
|
|
||||||
|
if (input.substr(peg$currPos, 4) === peg$c36) {
|
||||||
|
s0 = peg$c36;
|
||||||
|
peg$currPos += 4;
|
||||||
|
} else {
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c37); }
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
function peg$parseOPERATION() {
|
function peg$parseOPERATION() {
|
||||||
var s0;
|
var s0;
|
||||||
|
|
||||||
if (input.charCodeAt(peg$currPos) === 43) {
|
if (input.charCodeAt(peg$currPos) === 43) {
|
||||||
s0 = peg$c33;
|
s0 = peg$c38;
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s0 = peg$FAILED;
|
s0 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c34); }
|
if (peg$silentFails === 0) { peg$fail(peg$c39); }
|
||||||
}
|
}
|
||||||
if (s0 === peg$FAILED) {
|
if (s0 === peg$FAILED) {
|
||||||
if (input.charCodeAt(peg$currPos) === 45) {
|
if (input.charCodeAt(peg$currPos) === 45) {
|
||||||
s0 = peg$c35;
|
s0 = peg$c40;
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s0 = peg$FAILED;
|
s0 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c36); }
|
if (peg$silentFails === 0) { peg$fail(peg$c41); }
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -784,12 +895,20 @@ module.exports = /*
|
|||||||
var s0, s1, s2, s3;
|
var s0, s1, s2, s3;
|
||||||
|
|
||||||
s0 = peg$currPos;
|
s0 = peg$currPos;
|
||||||
if (peg$c37.test(input.charAt(peg$currPos))) {
|
s1 = peg$parseEND_LABEL();
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
|
peg$savedPos = s0;
|
||||||
|
s1 = peg$c30(s1);
|
||||||
|
}
|
||||||
|
s0 = s1;
|
||||||
|
if (s0 === peg$FAILED) {
|
||||||
|
s0 = peg$currPos;
|
||||||
|
if (peg$c42.test(input.charAt(peg$currPos))) {
|
||||||
s1 = input.charAt(peg$currPos);
|
s1 = input.charAt(peg$currPos);
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s1 = peg$FAILED;
|
s1 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c38); }
|
if (peg$silentFails === 0) { peg$fail(peg$c43); }
|
||||||
}
|
}
|
||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
s2 = [];
|
s2 = [];
|
||||||
@ -804,7 +923,7 @@ module.exports = /*
|
|||||||
}
|
}
|
||||||
if (s2 !== peg$FAILED) {
|
if (s2 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c32(s1, s2);
|
s1 = peg$c35(s1, s2);
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
} else {
|
} else {
|
||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
@ -814,55 +933,61 @@ module.exports = /*
|
|||||||
peg$currPos = s0;
|
peg$currPos = s0;
|
||||||
s0 = peg$FAILED;
|
s0 = peg$FAILED;
|
||||||
}
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return s0;
|
||||||
|
}
|
||||||
|
|
||||||
|
function peg$parseEND_LABEL() {
|
||||||
|
var s0;
|
||||||
|
|
||||||
|
if (input.charCodeAt(peg$currPos) === 69) {
|
||||||
|
s0 = peg$c44;
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s0 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c45); }
|
||||||
|
}
|
||||||
|
|
||||||
return s0;
|
return s0;
|
||||||
}
|
}
|
||||||
|
|
||||||
function peg$parseInteger() {
|
function peg$parseInteger() {
|
||||||
var s0, s1, s2, s3;
|
var s0, s1, s2;
|
||||||
|
|
||||||
peg$silentFails++;
|
peg$silentFails++;
|
||||||
s0 = peg$currPos;
|
s0 = peg$currPos;
|
||||||
s1 = peg$parse_();
|
s1 = [];
|
||||||
if (s1 !== peg$FAILED) {
|
if (peg$c47.test(input.charAt(peg$currPos))) {
|
||||||
s2 = [];
|
s2 = input.charAt(peg$currPos);
|
||||||
if (peg$c40.test(input.charAt(peg$currPos))) {
|
|
||||||
s3 = input.charAt(peg$currPos);
|
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
|
||||||
s3 = peg$FAILED;
|
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c41); }
|
|
||||||
}
|
|
||||||
if (s3 !== peg$FAILED) {
|
|
||||||
while (s3 !== peg$FAILED) {
|
|
||||||
s2.push(s3);
|
|
||||||
if (peg$c40.test(input.charAt(peg$currPos))) {
|
|
||||||
s3 = input.charAt(peg$currPos);
|
|
||||||
peg$currPos++;
|
|
||||||
} else {
|
|
||||||
s3 = peg$FAILED;
|
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c41); }
|
|
||||||
}
|
|
||||||
}
|
|
||||||
} else {
|
} else {
|
||||||
s2 = peg$FAILED;
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c48); }
|
||||||
}
|
}
|
||||||
if (s2 !== peg$FAILED) {
|
if (s2 !== peg$FAILED) {
|
||||||
|
while (s2 !== peg$FAILED) {
|
||||||
|
s1.push(s2);
|
||||||
|
if (peg$c47.test(input.charAt(peg$currPos))) {
|
||||||
|
s2 = input.charAt(peg$currPos);
|
||||||
|
peg$currPos++;
|
||||||
|
} else {
|
||||||
|
s2 = peg$FAILED;
|
||||||
|
if (peg$silentFails === 0) { peg$fail(peg$c48); }
|
||||||
|
}
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
}
|
||||||
|
if (s1 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c42();
|
s1 = peg$c49();
|
||||||
|
}
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
} else {
|
|
||||||
peg$currPos = s0;
|
|
||||||
s0 = peg$FAILED;
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
peg$currPos = s0;
|
|
||||||
s0 = peg$FAILED;
|
|
||||||
}
|
|
||||||
peg$silentFails--;
|
peg$silentFails--;
|
||||||
if (s0 === peg$FAILED) {
|
if (s0 === peg$FAILED) {
|
||||||
s1 = peg$FAILED;
|
s1 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c39); }
|
if (peg$silentFails === 0) { peg$fail(peg$c46); }
|
||||||
}
|
}
|
||||||
|
|
||||||
return s0;
|
return s0;
|
||||||
@ -874,32 +999,36 @@ module.exports = /*
|
|||||||
peg$silentFails++;
|
peg$silentFails++;
|
||||||
s0 = peg$currPos;
|
s0 = peg$currPos;
|
||||||
s1 = [];
|
s1 = [];
|
||||||
if (peg$c44.test(input.charAt(peg$currPos))) {
|
if (peg$c51.test(input.charAt(peg$currPos))) {
|
||||||
s2 = input.charAt(peg$currPos);
|
s2 = input.charAt(peg$currPos);
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s2 = peg$FAILED;
|
s2 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c45); }
|
if (peg$silentFails === 0) { peg$fail(peg$c52); }
|
||||||
}
|
}
|
||||||
|
if (s2 !== peg$FAILED) {
|
||||||
while (s2 !== peg$FAILED) {
|
while (s2 !== peg$FAILED) {
|
||||||
s1.push(s2);
|
s1.push(s2);
|
||||||
if (peg$c44.test(input.charAt(peg$currPos))) {
|
if (peg$c51.test(input.charAt(peg$currPos))) {
|
||||||
s2 = input.charAt(peg$currPos);
|
s2 = input.charAt(peg$currPos);
|
||||||
peg$currPos++;
|
peg$currPos++;
|
||||||
} else {
|
} else {
|
||||||
s2 = peg$FAILED;
|
s2 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c45); }
|
if (peg$silentFails === 0) { peg$fail(peg$c52); }
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
} else {
|
||||||
|
s1 = peg$FAILED;
|
||||||
|
}
|
||||||
if (s1 !== peg$FAILED) {
|
if (s1 !== peg$FAILED) {
|
||||||
peg$savedPos = s0;
|
peg$savedPos = s0;
|
||||||
s1 = peg$c46();
|
s1 = peg$c53();
|
||||||
}
|
}
|
||||||
s0 = s1;
|
s0 = s1;
|
||||||
peg$silentFails--;
|
peg$silentFails--;
|
||||||
if (s0 === peg$FAILED) {
|
if (s0 === peg$FAILED) {
|
||||||
s1 = peg$FAILED;
|
s1 = peg$FAILED;
|
||||||
if (peg$silentFails === 0) { peg$fail(peg$c43); }
|
if (peg$silentFails === 0) { peg$fail(peg$c50); }
|
||||||
}
|
}
|
||||||
|
|
||||||
return s0;
|
return s0;
|
Loading…
Reference in New Issue
Block a user