karel
Version:
Compilador y evaluador de Karel en javascript
904 lines (854 loc) • 36 kB
JavaScript
/* parser generated by jison 0.4.17 */
/*
Returns a Parser object of the following structure:
Parser: {
yy: {}
}
Parser.prototype: {
yy: {},
trace: function(),
symbols_: {associative list: name ==> number},
terminals_: {associative list: number ==> name},
productions_: [...],
performAction: function anonymous(yytext, yyleng, yylineno, yy, yystate, $$, _$),
table: [...],
defaultActions: {...},
parseError: function(str, hash),
parse: function(input),
lexer: {
EOF: 1,
parseError: function(str, hash),
setInput: function(input),
input: function(),
unput: function(str),
more: function(),
less: function(n),
pastInput: function(),
upcomingInput: function(),
showPosition: function(),
test_match: function(regex_match_array, rule_index),
next: function(),
lex: function(),
begin: function(condition),
popState: function(),
_currentRules: function(),
topState: function(),
pushState: function(condition),
options: {
ranges: boolean (optional: true ==> token location info will include a .range[] member)
flex: boolean (optional: true ==> flex-like lexing behaviour where the rules are tested exhaustively to find the longest match)
backtrack_lexer: boolean (optional: true ==> lexer regexes are tested in order and for each matching regex the action code is invoked; the lexer terminates the scan when a token is returned by the action code)
},
performAction: function(yy, yy_, $avoiding_name_collisions, YY_START),
rules: [...],
conditions: {associative list: name ==> set},
}
}
token location info (@$, _$, etc.): {
first_line: n,
last_line: n,
first_column: n,
last_column: n,
range: [start_number, end_number] (where the numbers are indexes into the input string, regular zero-based)
}
the parseError function receives a 'hash' object with these members for lexer and parser errors: {
text: (matched text)
token: (the produced terminal token, if any)
line: (yylineno)
}
while parser (grammar) errors will also provide these members, i.e. parser errors deliver a superset of attributes: {
loc: (yylloc)
expected: (string describing the set of expected tokens)
recoverable: (boolean: TRUE when the parser has a error recovery rule available for this particular error)
}
*/
var karelruby = (function(){
var o=function(k,v,o,l){for(o=o||{},l=k.length;l--;o[k[l]]=v);return o},$V0=[12,18,19,20,21,22,23,28,31,61,62,63,64],$V1=[2,9],$V2=[1,4],$V3=[1,8],$V4=[1,9],$V5=[1,10],$V6=[1,11],$V7=[1,12],$V8=[1,13],$V9=[1,14],$Va=[1,21],$Vb=[1,22],$Vc=[1,24],$Vd=[1,25],$Ve=[1,26],$Vf=[1,23],$Vg=[2,8],$Vh=[1,27],$Vi=[6,11,12,15,18,19,20,21,22,23,28,30,31,61,62,63,64],$Vj=[6,11],$Vk=[2,64],$Vl=[16,39,41,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60],$Vm=[17,33],$Vn=[1,54],$Vo=[1,50],$Vp=[1,52],$Vq=[1,55],$Vr=[1,56],$Vs=[1,57],$Vt=[1,58],$Vu=[1,59],$Vv=[1,60],$Vw=[1,61],$Vx=[1,62],$Vy=[1,63],$Vz=[1,64],$VA=[1,65],$VB=[1,66],$VC=[1,67],$VD=[1,68],$VE=[1,69],$VF=[1,70],$VG=[1,71],$VH=[1,72],$VI=[1,82],$VJ=[11,17,35],$VK=[1,83],$VL=[11,17,35,37],$VM=[15,18,19,20,21,22,23,28,30,31,61,62,63,64];
var parser = {trace: function trace() { },
yy: {},
symbols_: {"error":2,"program":3,"opt_newlines":4,"def_expr_list":5,"EOF":6,"newlines":7,"def":8,"expr":9,"expr_list":10,"NEWLINE":11,"DEF":12,"line":13,"var":14,"END":15,"(":16,")":17,"FORWARD":18,"LEFT":19,"PICKBUZZER":20,"LEAVEBUZZER":21,"HALT":22,"RET":23,"call":24,"repeat":25,"cond":26,"loop":27,"IF":28,"term":29,"ELSE":30,"WHILE":31,"integer":32,"TIMES":33,"non_var_integer":34,"OR":35,"and_term":36,"AND":37,"not_term":38,"NOT":39,"clause":40,"IFZ":41,"bool_fun":42,"IFNFWALL":43,"IFFWALL":44,"IFNLWALL":45,"IFLWALL":46,"IFNRWALL":47,"IFRWALL":48,"IFWBUZZER":49,"IFNWBUZZER":50,"IFBBUZZER":51,"IFNBBUZZER":52,"IFW":53,"IFN":54,"IFE":55,"IFS":56,"IFNW":57,"IFNN":58,"IFNE":59,"IFNS":60,"NUM":61,"INC":62,"DEC":63,"VAR":64,"$accept":0,"$end":1},
terminals_: {2:"error",6:"EOF",11:"NEWLINE",12:"DEF",15:"END",16:"(",17:")",18:"FORWARD",19:"LEFT",20:"PICKBUZZER",21:"LEAVEBUZZER",22:"HALT",23:"RET",28:"IF",30:"ELSE",31:"WHILE",33:"TIMES",35:"OR",37:"AND",39:"NOT",41:"IFZ",43:"IFNFWALL",44:"IFFWALL",45:"IFNLWALL",46:"IFLWALL",47:"IFNRWALL",48:"IFRWALL",49:"IFWBUZZER",50:"IFNWBUZZER",51:"IFBBUZZER",52:"IFNBBUZZER",53:"IFW",54:"IFN",55:"IFE",56:"IFS",57:"IFNW",58:"IFNN",59:"IFNE",60:"IFNS",61:"NUM",62:"INC",63:"DEC",64:"VAR"},
productions_: [0,[3,4],[5,3],[5,3],[5,1],[5,1],[10,3],[10,2],[4,1],[4,0],[7,2],[7,1],[8,6],[8,9],[9,1],[9,1],[9,1],[9,1],[9,1],[9,1],[9,1],[9,1],[9,1],[9,1],[26,6],[26,9],[27,6],[24,1],[24,4],[25,6],[25,6],[29,3],[29,1],[36,3],[36,1],[38,2],[38,1],[40,4],[40,1],[40,3],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[42,1],[32,1],[32,1],[34,1],[34,4],[34,4],[14,1],[13,0]],
performAction: function anonymous(yytext, yyleng, yylineno, yy, yystate /* action[1] */, $$ /* vstack */, _$ /* lstack */) {
/* this == yyval */
var $0 = $$.length - 1;
switch (yystate) {
case 1:
return validate($$[$0-2][0], $$[$0-2][1].concat([['LINE', yylineno], ['HALT']]), yy);
break;
case 2:
this.$ = [$$[$0-2][0].concat($$[$0]), $$[$0-2][1]];
break;
case 3:
this.$ = [$$[$0-2][0], $$[$0-2][1].concat($$[$0])];
break;
case 4:
this.$ = [$$[$0], []];
break;
case 5:
this.$ = [[], $$[$0]];
break;
case 6:
this.$ = $$[$0-2].concat($$[$0-1]);
break;
case 7: case 39:
this.$ = $$[$0-1];
break;
case 12:
this.$ = [[$$[$0-3], $$[$0-4].concat($$[$0-1]).concat([['RET']])], 1];
break;
case 13:
var result = $$[$0-7].concat($$[$0-1]).concat([['RET']]);
for (var i = 0; i < result.length; i++) {
if (result[i][0] == 'PARAM') {
if (result[i][1] == $$[$0-4]) {
result[i][1] = 0;
} else {
yy.parser.parseError("Unknown variable: " + $$[$0-4], {
text: $$[$0-4],
line: yylineno
});
}
}
}
this.$ = [[$$[$0-6], result, 2]];
break;
case 14:
this.$ = [['LINE', yylineno], ['WORLDWALLS'], ['ORIENTATION'], ['MASK'], ['AND'], ['NOT'], ['EZ', 'WALL'], ['FORWARD']];
break;
case 15:
this.$ = [['LINE', yylineno], ['LEFT']];
break;
case 16:
this.$ = [['LINE', yylineno], ['WORLDBUZZERS'], ['EZ', 'WORLDUNDERFLOW'], ['PICKBUZZER']];
break;
case 17:
this.$ = [['LINE', yylineno], ['BAGBUZZERS'], ['EZ', 'BAGUNDERFLOW'], ['LEAVEBUZZER']];
break;
case 18:
this.$ = [['LINE', yylineno], ['HALT']];
break;
case 19:
this.$ = [['LINE', yylineno], ['RET']];
break;
case 20: case 21: case 22: case 23: case 32: case 34: case 36: case 38: case 59:
this.$ = $$[$0];
break;
case 24:
this.$ = $$[$0-3].concat($$[$0-4]).concat([['JZ', $$[$0-1].length]]).concat($$[$0-1]);
break;
case 25:
this.$ = $$[$0-6].concat($$[$0-7]).concat([['JZ', 1 + $$[$0-4].length]]).concat($$[$0-4]).concat([['JMP', $$[$0-1].length]]).concat($$[$0-1]);
break;
case 26:
this.$ = $$[$0-3].concat($$[$0-4]).concat([['JZ', 1 + $$[$0-1].length]]).concat($$[$0-1]).concat([['JMP', -1 -($$[$0-3].length + 1 + $$[$0-1].length + 1)]]);
break;
case 27:
this.$ = [['LINE', yylineno], ['LOAD', 0], ['CALL', $$[$0], 1], ['LINE', yylineno]];
break;
case 28:
this.$ = [['LINE', yylineno]].concat($$[$0-1]).concat([['CALL', $$[$0-3], 2], ['LINE', yylineno]]);
break;
case 29:
this.$ = [['PARAM', $$[$0-5]]].concat($$[$0-3]).concat([['DUP'], ['LOAD', 0], ['EQ'], ['NOT'], ['JZ', $$[$0-1].length + 2]]).concat($$[$0-1]).concat([['DEC'], ['JMP', -1 -($$[$0-1].length + 7)], ['POP']]);
break;
case 30:
this.$ = $$[$0-5].concat($$[$0-3]).concat([['DUP'], ['LOAD', 0], ['EQ'], ['NOT'], ['JZ', $$[$0-1].length + 2]]).concat($$[$0-1]).concat([['DEC'], ['JMP', -1 -($$[$0-1].length + 7)], ['POP']]);
break;
case 31:
this.$ = $$[$0-2].concat($$[$0]).concat([['OR']]);
break;
case 33:
this.$ = $$[$0-2].concat($$[$0]).concat([['AND']]);
break;
case 35:
this.$ = $$[$0].concat([['NOT']]);
break;
case 37:
this.$ = $$[$0-1].concat([['NOT']]);
break;
case 40:
this.$ = [['WORLDWALLS'], ['ORIENTATION'], ['MASK'], ['AND'], ['NOT']];
break;
case 41:
this.$ = [['WORLDWALLS'], ['ORIENTATION'], ['MASK'], ['AND']];
break;
case 42:
this.$ = [['WORLDWALLS'], ['ORIENTATION'], ['ROTL'], ['MASK'], ['AND'], ['NOT']];
break;
case 43:
this.$ = [['WORLDWALLS'], ['ORIENTATION'], ['ROTL'], ['MASK'], ['AND']];
break;
case 44:
this.$ = [['WORLDWALLS'], ['ORIENTATION'], ['ROTR'], ['MASK'], ['AND'], ['NOT']];
break;
case 45:
this.$ = [['WORLDWALLS'], ['ORIENTATION'], ['ROTR'], ['MASK'], ['AND']];
break;
case 46:
this.$ = [['WORLDBUZZERS'], ['LOAD', 0], ['EQ'], ['NOT']];
break;
case 47:
this.$ = [['WORLDBUZZERS'], ['NOT']];
break;
case 48:
this.$ = [['BAGBUZZERS'], ['LOAD', 0], ['EQ'], ['NOT']];
break;
case 49:
this.$ = [['BAGBUZZERS'], ['NOT']];
break;
case 50:
this.$ = [['ORIENTATION'], ['LOAD', 0], ['EQ']];
break;
case 51:
this.$ = [['ORIENTATION'], ['LOAD', 1], ['EQ']];
break;
case 52:
this.$ = [['ORIENTATION'], ['LOAD', 2], ['EQ']];
break;
case 53:
this.$ = [['ORIENTATION'], ['LOAD', 3], ['EQ']];
break;
case 54:
this.$ = [['ORIENTATION'], ['LOAD', 0], ['EQ'], ['NOT']];
break;
case 55:
this.$ = [['ORIENTATION'], ['LOAD', 1], ['EQ'], ['NOT']];
break;
case 56:
this.$ = [['ORIENTATION'], ['LOAD', 2], ['EQ'], ['NOT']];
break;
case 57:
this.$ = [['ORIENTATION'], ['LOAD', 3], ['EQ'], ['NOT']];
break;
case 58:
this.$ = [['PARAM', $$[$0]]];
break;
case 60:
this.$ = [['LOAD', parseInt(yytext)]];
break;
case 61:
this.$ = $$[$0-1].concat([['INC']]);
break;
case 62:
this.$ = $$[$0-1].concat([['DEC']]);
break;
case 63:
this.$ = yytext;
break;
case 64:
this.$ = [['LINE', yylineno]];
break;
}
},
table: [o($V0,$V1,{3:1,4:2,7:3,11:$V2}),{1:[3]},{5:5,8:6,9:7,12:$V3,14:19,18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},o($V0,$Vg,{11:$Vh}),o($Vi,[2,11]),{4:28,6:$V1,7:29,11:$V2},o($Vj,[2,4]),o($Vj,[2,5]),{13:30,64:$Vk},o($Vj,[2,14]),o($Vj,[2,15]),o($Vj,[2,16]),o($Vj,[2,17]),o($Vj,[2,18]),o($Vj,[2,19]),o($Vj,[2,20]),o($Vj,[2,21]),o($Vj,[2,22]),o($Vj,[2,23]),o($Vj,[2,27],{16:[1,31],33:[1,32]}),{33:[1,33]},o($Vl,$Vk,{13:34}),o($Vl,$Vk,{13:35}),o([6,11,16,17,33],[2,63]),o($Vm,[2,60]),{16:[1,36]},{16:[1,37]},o($Vi,[2,10]),{6:[1,38]},{6:$Vg,8:39,9:40,11:$Vh,12:$V3,14:19,18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{14:41,64:$Vf},{14:43,32:42,34:44,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{11:$Vk,13:45},{11:$Vk,13:46},{16:$Vn,29:47,36:48,38:49,39:$Vo,40:51,41:$Vp,42:53,43:$Vq,44:$Vr,45:$Vs,46:$Vt,47:$Vu,48:$Vv,49:$Vw,50:$Vx,51:$Vy,52:$Vz,53:$VA,54:$VB,55:$VC,56:$VD,57:$VE,58:$VF,59:$VG,60:$VH},{16:$Vn,29:73,36:48,38:49,39:$Vo,40:51,41:$Vp,42:53,43:$Vq,44:$Vr,45:$Vs,46:$Vt,47:$Vu,48:$Vv,49:$Vw,50:$Vx,51:$Vy,52:$Vz,53:$VA,54:$VB,55:$VC,56:$VD,57:$VE,58:$VF,59:$VG,60:$VH},{14:43,32:74,34:44,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{14:43,32:75,34:44,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{1:[2,1]},o($Vj,[2,2]),o($Vj,[2,3]),{7:76,11:$V2,16:[1,77]},{17:[1,78]},{17:[2,58]},{17:[2,59]},{7:79,11:$V2},{7:80,11:$V2},{7:81,11:$V2,35:$VI},o($VJ,[2,32],{37:$VK}),o($VL,[2,34]),{16:$Vn,40:84,41:$Vp,42:53,43:$Vq,44:$Vr,45:$Vs,46:$Vt,47:$Vu,48:$Vv,49:$Vw,50:$Vx,51:$Vy,52:$Vz,53:$VA,54:$VB,55:$VC,56:$VD,57:$VE,58:$VF,59:$VG,60:$VH},o($VL,[2,36]),{16:[1,85]},o($VL,[2,38]),{16:$Vn,29:86,36:48,38:49,39:$Vo,40:51,41:$Vp,42:53,43:$Vq,44:$Vr,45:$Vs,46:$Vt,47:$Vu,48:$Vv,49:$Vw,50:$Vx,51:$Vy,52:$Vz,53:$VA,54:$VB,55:$VC,56:$VD,57:$VE,58:$VF,59:$VG,60:$VH},o($VL,[2,40]),o($VL,[2,41]),o($VL,[2,42]),o($VL,[2,43]),o($VL,[2,44]),o($VL,[2,45]),o($VL,[2,46]),o($VL,[2,47]),o($VL,[2,48]),o($VL,[2,49]),o($VL,[2,50]),o($VL,[2,51]),o($VL,[2,52]),o($VL,[2,53]),o($VL,[2,54]),o($VL,[2,55]),o($VL,[2,56]),o($VL,[2,57]),{7:87,11:$V2,35:$VI},{17:[1,88]},{17:[1,89]},{9:91,10:90,11:$Vh,14:19,18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{14:92,64:$Vf},o($Vj,[2,28]),{9:91,10:93,11:$Vh,14:19,18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{9:91,10:94,11:$Vh,14:19,18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{9:91,10:95,11:$Vh,14:19,18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{16:$Vn,36:96,38:49,39:$Vo,40:51,41:$Vp,42:53,43:$Vq,44:$Vr,45:$Vs,46:$Vt,47:$Vu,48:$Vv,49:$Vw,50:$Vx,51:$Vy,52:$Vz,53:$VA,54:$VB,55:$VC,56:$VD,57:$VE,58:$VF,59:$VG,60:$VH},{16:$Vn,38:97,39:$Vo,40:51,41:$Vp,42:53,43:$Vq,44:$Vr,45:$Vs,46:$Vt,47:$Vu,48:$Vv,49:$Vw,50:$Vx,51:$Vy,52:$Vz,53:$VA,54:$VB,55:$VC,56:$VD,57:$VE,58:$VF,59:$VG,60:$VH},o($VL,[2,35]),{14:43,32:98,34:44,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{17:[1,99],35:$VI},{9:91,10:100,11:$Vh,14:19,18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},o($Vm,[2,61]),o($Vm,[2,62]),{9:102,14:19,15:[1,101],18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{7:103,11:$V2},{17:[1,104]},{9:102,14:19,15:[1,105],18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{9:102,14:19,15:[1,106],18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{9:102,14:19,15:[1,107],18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,30:[1,108],31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},o($VJ,[2,31],{37:$VK}),o($VL,[2,33]),{17:[1,109]},o($VL,[2,39]),{9:102,14:19,15:[1,110],18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},o($Vj,[2,12]),{7:111,11:$V2},o($VM,[2,7],{11:$Vh}),{7:112,11:$V2},o($Vj,[2,29]),o($Vj,[2,30]),o($Vj,[2,24]),{7:113,11:$V2},o($VL,[2,37]),o($Vj,[2,26]),o($VM,[2,6],{11:$Vh}),{9:91,10:114,11:$Vh,14:19,18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{9:91,10:115,11:$Vh,14:19,18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{9:102,14:19,15:[1,116],18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},{9:102,14:19,15:[1,117],18:$V4,19:$V5,20:$V6,21:$V7,22:$V8,23:$V9,24:15,25:16,26:17,27:18,28:$Va,31:$Vb,34:20,61:$Vc,62:$Vd,63:$Ve,64:$Vf},o($Vj,[2,13]),o($Vj,[2,25])],
defaultActions: {38:[2,1],43:[2,58],44:[2,59]},
parseError: function parseError(str, hash) {
if (hash.recoverable) {
this.trace(str);
} else {
function _parseError (msg, hash) {
this.message = msg;
this.hash = hash;
}
_parseError.prototype = Error;
throw new _parseError(str, hash);
}
},
parse: function parse(input) {
var self = this, stack = [0], tstack = [], vstack = [null], lstack = [], table = this.table, yytext = '', yylineno = 0, yyleng = 0, recovering = 0, TERROR = 2, EOF = 1;
var args = lstack.slice.call(arguments, 1);
var lexer = Object.create(this.lexer);
var sharedState = { yy: {} };
for (var k in this.yy) {
if (Object.prototype.hasOwnProperty.call(this.yy, k)) {
sharedState.yy[k] = this.yy[k];
}
}
lexer.setInput(input, sharedState.yy);
sharedState.yy.lexer = lexer;
sharedState.yy.parser = this;
if (typeof lexer.yylloc == 'undefined') {
lexer.yylloc = {};
}
var yyloc = lexer.yylloc;
lstack.push(yyloc);
var ranges = lexer.options && lexer.options.ranges;
if (typeof sharedState.yy.parseError === 'function') {
this.parseError = sharedState.yy.parseError;
} else {
this.parseError = Object.getPrototypeOf(this).parseError;
}
function popStack(n) {
stack.length = stack.length - 2 * n;
vstack.length = vstack.length - n;
lstack.length = lstack.length - n;
}
_token_stack:
var lex = function () {
var token;
token = lexer.lex() || EOF;
if (typeof token !== 'number') {
token = self.symbols_[token] || token;
}
return token;
};
var symbol, preErrorSymbol, state, action, a, r, yyval = {}, p, len, newState, expected;
while (true) {
state = stack[stack.length - 1];
if (this.defaultActions[state]) {
action = this.defaultActions[state];
} else {
if (symbol === null || typeof symbol == 'undefined') {
symbol = lex();
}
action = table[state] && table[state][symbol];
}
if (typeof action === 'undefined' || !action.length || !action[0]) {
var errStr = '';
expected = [];
for (p in table[state]) {
if (this.terminals_[p] && p > TERROR) {
expected.push('\'' + this.terminals_[p] + '\'');
}
}
if (lexer.showPosition) {
errStr = 'Parse error on line ' + (yylineno + 1) + ':\n' + lexer.showPosition() + '\nExpecting ' + expected.join(', ') + ', got \'' + (this.terminals_[symbol] || symbol) + '\'';
} else {
errStr = 'Parse error on line ' + (yylineno + 1) + ': Unexpected ' + (symbol == EOF ? 'end of input' : '\'' + (this.terminals_[symbol] || symbol) + '\'');
}
this.parseError(errStr, {
text: lexer.match,
token: this.terminals_[symbol] || symbol,
line: lexer.yylineno,
loc: yyloc,
expected: expected
});
}
if (action[0] instanceof Array && action.length > 1) {
throw new Error('Parse Error: multiple actions possible at state: ' + state + ', token: ' + symbol);
}
switch (action[0]) {
case 1:
stack.push(symbol);
vstack.push(lexer.yytext);
lstack.push(lexer.yylloc);
stack.push(action[1]);
symbol = null;
if (!preErrorSymbol) {
yyleng = lexer.yyleng;
yytext = lexer.yytext;
yylineno = lexer.yylineno;
yyloc = lexer.yylloc;
if (recovering > 0) {
recovering--;
}
} else {
symbol = preErrorSymbol;
preErrorSymbol = null;
}
break;
case 2:
len = this.productions_[action[1]][1];
yyval.$ = vstack[vstack.length - len];
yyval._$ = {
first_line: lstack[lstack.length - (len || 1)].first_line,
last_line: lstack[lstack.length - 1].last_line,
first_column: lstack[lstack.length - (len || 1)].first_column,
last_column: lstack[lstack.length - 1].last_column
};
if (ranges) {
yyval._$.range = [
lstack[lstack.length - (len || 1)].range[0],
lstack[lstack.length - 1].range[1]
];
}
r = this.performAction.apply(yyval, [
yytext,
yyleng,
yylineno,
sharedState.yy,
action[1],
vstack,
lstack
].concat(args));
if (typeof r !== 'undefined') {
return r;
}
if (len) {
stack = stack.slice(0, -1 * len * 2);
vstack = vstack.slice(0, -1 * len);
lstack = lstack.slice(0, -1 * len);
}
stack.push(this.productions_[action[1]][0]);
vstack.push(yyval.$);
lstack.push(yyval._$);
newState = table[stack[stack.length - 2]][stack[stack.length - 1]];
stack.push(newState);
break;
case 3:
return true;
}
}
return true;
}};
function validate(function_list, program, yy) {
var functions = {};
var prototypes = {};
for (var i = 0; i < function_list.length; i++) {
if (functions[function_list[i][0]]) {
yy.parser.parseError("Function redefinition: " + function_list[i][0], {
text: function_list[i][0],
line: function_list[i][3]
});
}
functions[function_list[i][0]] = program.length;
prototypes[function_list[i][0]] = function_list[i][2];
program = program.concat(function_list[i][1]);
}
var current_line = 0;
for (var i = 0; i < program.length; i++) {
if (program[i][0] == 'LINE') {
current_line = program[i][1];
} else if (program[i][0] == 'CALL') {
if (!functions[program[i][1]] || !prototypes[program[i][1]]) {
yy.parser.parseError("Undefined function: " + program[i][1], {
text: program[i][1],
line: current_line
});
} else if (prototypes[program[i][1]] != program[i][2]) {
yy.parser.parseError("Function parameter mismatch: " + program[i][1], {
text: program[i][1],
line: current_line
});
}
program[i][2] = program[i][1];
program[i][1] = functions[program[i][1]];
} else if (program[i][0] == 'PARAM' && program[i][1] != 0) {
yy.parser.parseError("Unknown variable: " + program[i][1], {
text: program[i][1],
line: current_line + 1
});
}
}
return program;
}
/* generated by jison-lex 0.3.4 */
var lexer = (function(){
var lexer = ({
EOF:1,
parseError:function parseError(str, hash) {
if (this.yy.parser) {
this.yy.parser.parseError(str, hash);
} else {
throw new Error(str);
}
},
// resets the lexer, sets new input
setInput:function (input, yy) {
this.yy = yy || this.yy || {};
this._input = input;
this._more = this._backtrack = this.done = false;
this.yylineno = this.yyleng = 0;
this.yytext = this.matched = this.match = '';
this.conditionStack = ['INITIAL'];
this.yylloc = {
first_line: 1,
first_column: 0,
last_line: 1,
last_column: 0
};
if (this.options.ranges) {
this.yylloc.range = [0,0];
}
this.offset = 0;
return this;
},
// consumes and returns one char from the input
input:function () {
var ch = this._input[0];
this.yytext += ch;
this.yyleng++;
this.offset++;
this.match += ch;
this.matched += ch;
var lines = ch.match(/(?:\r\n?|\n).*/g);
if (lines) {
this.yylineno++;
this.yylloc.last_line++;
} else {
this.yylloc.last_column++;
}
if (this.options.ranges) {
this.yylloc.range[1]++;
}
this._input = this._input.slice(1);
return ch;
},
// unshifts one char (or a string) into the input
unput:function (ch) {
var len = ch.length;
var lines = ch.split(/(?:\r\n?|\n)/g);
this._input = ch + this._input;
this.yytext = this.yytext.substr(0, this.yytext.length - len);
//this.yyleng -= len;
this.offset -= len;
var oldLines = this.match.split(/(?:\r\n?|\n)/g);
this.match = this.match.substr(0, this.match.length - 1);
this.matched = this.matched.substr(0, this.matched.length - 1);
if (lines.length - 1) {
this.yylineno -= lines.length - 1;
}
var r = this.yylloc.range;
this.yylloc = {
first_line: this.yylloc.first_line,
last_line: this.yylineno + 1,
first_column: this.yylloc.first_column,
last_column: lines ?
(lines.length === oldLines.length ? this.yylloc.first_column : 0)
+ oldLines[oldLines.length - lines.length].length - lines[0].length :
this.yylloc.first_column - len
};
if (this.options.ranges) {
this.yylloc.range = [r[0], r[0] + this.yyleng - len];
}
this.yyleng = this.yytext.length;
return this;
},
// When called from action, caches matched text and appends it on next action
more:function () {
this._more = true;
return this;
},
// When called from action, signals the lexer that this rule fails to match the input, so the next matching rule (regex) should be tested instead.
reject:function () {
if (this.options.backtrack_lexer) {
this._backtrack = true;
} else {
return this.parseError('Lexical error on line ' + (this.yylineno + 1) + '. You can only invoke reject() in the lexer when the lexer is of the backtracking persuasion (options.backtrack_lexer = true).\n' + this.showPosition(), {
text: "",
token: null,
line: this.yylineno
});
}
return this;
},
// retain first n characters of the match
less:function (n) {
this.unput(this.match.slice(n));
},
// displays already matched input, i.e. for error messages
pastInput:function () {
var past = this.matched.substr(0, this.matched.length - this.match.length);
return (past.length > 20 ? '...':'') + past.substr(-20).replace(/\n/g, "");
},
// displays upcoming input, i.e. for error messages
upcomingInput:function () {
var next = this.match;
if (next.length < 20) {
next += this._input.substr(0, 20-next.length);
}
return (next.substr(0,20) + (next.length > 20 ? '...' : '')).replace(/\n/g, "");
},
// displays the character position where the lexing error occurred, i.e. for error messages
showPosition:function () {
var pre = this.pastInput();
var c = new Array(pre.length + 1).join("-");
return pre + this.upcomingInput() + "\n" + c + "^";
},
// test the lexed token: return FALSE when not a match, otherwise return token
test_match:function (match, indexed_rule) {
var token,
lines,
backup;
if (this.options.backtrack_lexer) {
// save context
backup = {
yylineno: this.yylineno,
yylloc: {
first_line: this.yylloc.first_line,
last_line: this.last_line,
first_column: this.yylloc.first_column,
last_column: this.yylloc.last_column
},
yytext: this.yytext,
match: this.match,
matches: this.matches,
matched: this.matched,
yyleng: this.yyleng,
offset: this.offset,
_more: this._more,
_input: this._input,
yy: this.yy,
conditionStack: this.conditionStack.slice(0),
done: this.done
};
if (this.options.ranges) {
backup.yylloc.range = this.yylloc.range.slice(0);
}
}
lines = match[0].match(/(?:\r\n?|\n).*/g);
if (lines) {
this.yylineno += lines.length;
}
this.yylloc = {
first_line: this.yylloc.last_line,
last_line: this.yylineno + 1,
first_column: this.yylloc.last_column,
last_column: lines ?
lines[lines.length - 1].length - lines[lines.length - 1].match(/\r?\n?/)[0].length :
this.yylloc.last_column + match[0].length
};
this.yytext += match[0];
this.match += match[0];
this.matches = match;
this.yyleng = this.yytext.length;
if (this.options.ranges) {
this.yylloc.range = [this.offset, this.offset += this.yyleng];
}
this._more = false;
this._backtrack = false;
this._input = this._input.slice(match[0].length);
this.matched += match[0];
token = this.performAction.call(this, this.yy, this, indexed_rule, this.conditionStack[this.conditionStack.length - 1]);
if (this.done && this._input) {
this.done = false;
}
if (token) {
return token;
} else if (this._backtrack) {
// recover context
for (var k in backup) {
this[k] = backup[k];
}
return false; // rule action called reject() implying the next rule should be tested instead.
}
return false;
},
// return next match in input
next:function () {
if (this.done) {
return this.EOF;
}
if (!this._input) {
this.done = true;
}
var token,
match,
tempMatch,
index;
if (!this._more) {
this.yytext = '';
this.match = '';
}
var rules = this._currentRules();
for (var i = 0; i < rules.length; i++) {
tempMatch = this._input.match(this.rules[rules[i]]);
if (tempMatch && (!match || tempMatch[0].length > match[0].length)) {
match = tempMatch;
index = i;
if (this.options.backtrack_lexer) {
token = this.test_match(tempMatch, rules[i]);
if (token !== false) {
return token;
} else if (this._backtrack) {
match = false;
continue; // rule action called reject() implying a rule MISmatch.
} else {
// else: this is a lexer rule which consumes input without producing a token (e.g. whitespace)
return false;
}
} else if (!this.options.flex) {
break;
}
}
}
if (match) {
token = this.test_match(match, rules[index]);
if (token !== false) {
return token;
}
// else: this is a lexer rule which consumes input without producing a token (e.g. whitespace)
return false;
}
if (this._input === "") {
return this.EOF;
} else {
return this.parseError('Lexical error on line ' + (this.yylineno + 1) + '. Unrecognized text.\n' + this.showPosition(), {
text: "",
token: null,
line: this.yylineno
});
}
},
// return next match that has a token
lex:function lex() {
var r = this.next();
if (r) {
return r;
} else {
return this.lex();
}
},
// activates a new lexer condition state (pushes the new lexer condition state onto the condition stack)
begin:function begin(condition) {
this.conditionStack.push(condition);
},
// pop the previously active lexer condition state off the condition stack
popState:function popState() {
var n = this.conditionStack.length - 1;
if (n > 0) {
return this.conditionStack.pop();
} else {
return this.conditionStack[0];
}
},
// produce the lexer rule set which is active for the currently active lexer condition state
_currentRules:function _currentRules() {
if (this.conditionStack.length && this.conditionStack[this.conditionStack.length - 1]) {
return this.conditions[this.conditionStack[this.conditionStack.length - 1]].rules;
} else {
return this.conditions["INITIAL"].rules;
}
},
// return the currently active lexer condition state; when an index argument is provided it produces the N-th previous condition state, if available
topState:function topState(n) {
n = this.conditionStack.length - 1 - Math.abs(n || 0);
if (n >= 0) {
return this.conditionStack[n];
} else {
return "INITIAL";
}
},
// alias for begin(condition)
pushState:function pushState(condition) {
this.begin(condition);
},
// return the number of states currently on the stack
stateStackSize:function stateStackSize() {
return this.conditionStack.length;
},
options: {},
performAction: function anonymous(yy,yy_,$avoiding_name_collisions,YY_START) {
var YYSTATE=YY_START;
switch($avoiding_name_collisions) {
case 0: return 11;
break;
case 1:/* ignore */
break;
case 2:/* ignore */
break;
case 3: return 12;
break;
case 4: return 22;
break;
case 5: return 23;
break;
case 6: return 19;
break;
case 7: return 18;
break;
case 8: return 20;
break;
case 9: return 21;
break;
case 10: return 15;
break;
case 11: return 33;
break;
case 12: return 31;
break;
case 13: return 63;
break;
case 14: return 62;
break;
case 15: return 41;
break;
case 16: return 43;
break;
case 17: return 44;
break;
case 18: return 45;
break;
case 19: return 46;
break;
case 20: return 47;
break;
case 21: return 48;
break;
case 22: return 49;
break;
case 23: return 50;
break;
case 24: return 51;
break;
case 25: return 52;
break;
case 26: return 54;
break;
case 27: return 56;
break;
case 28: return 55;
break;
case 29: return 53;
break;
case 30: return 58;
break;
case 31: return 60;
break;
case 32: return 59;
break;
case 33: return 57;
break;
case 34: return 30;
break;
case 35: return 28;
break;
case 36: return 39;
break;
case 37: return 35;
break;
case 38: return 35;
break;
case 39: return 37;
break;
case 40: return 16;
break;
case 41: return 17;
break;
case 42: return 61;
break;
case 43: return 64;
break;
case 44: return 6;
break;
}
},
rules: [/^(?:[\n])/,/^(?:\s+)/,/^(?:#[^\n]*)/,/^(?:def\b)/,/^(?:apagate\b)/,/^(?:sal-de-instruccion\b)/,/^(?:gira-izquierda\b)/,/^(?:avanza\b)/,/^(?:coge-zumbador\b)/,/^(?:deja-zumbador\b)/,/^(?:fin\b)/,/^(?:veces\b)/,/^(?:mientras\b)/,/^(?:precede\b)/,/^(?:sucede\b)/,/^(?:si-es-cero\b)/,/^(?:frente-libre\b)/,/^(?:frente-bloqueado\b)/,/^(?:izquierda-libre\b)/,/^(?:izquierda-bloqueada\b)/,/^(?:derecha-libre\b)/,/^(?:derecha-bloqueada\b)/,/^(?:junto-a-zumbador\b)/,/^(?:no-junto-a-zumbador\b)/,/^(?:algun-zumbador-en-la-mochila\b)/,/^(?:ningun-zumbador-en-la-mochila\b)/,/^(?:orientado-al-norte\b)/,/^(?:orientado-al-sur\b)/,/^(?:orientado-al-este\b)/,/^(?:orientado-al-oeste\b)/,/^(?:no-orientado-al-norte\b)/,/^(?:no-orientado-al-sur\b)/,/^(?:no-orientado-al-este\b)/,/^(?:no-orientado-al-oeste\b)/,/^(?:sino\b)/,/^(?:si\b)/,/^(?:no\b)/,/^(?:o\b)/,/^(?:u\b)/,/^(?:y\b)/,/^(?:\()/,/^(?:\))/,/^(?:[0-9]+)/,/^(?:[a-zA-Z][a-zA-Z0-9-]*)/,/^(?:$)/],
conditions: {"INITIAL":{"rules":[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44],"inclusive":true}}
});
return lexer;
})();
parser.lexer = lexer;
function Parser () {
this.yy = {};
}
Parser.prototype = parser;parser.Parser = Parser;
return new Parser;
})();
if (typeof require !== 'undefined' && typeof exports !== 'undefined') {
exports.parser = karelruby;
exports.Parser = karelruby.Parser;
exports.parse = function () { return karelruby.parse.apply(karelruby, arguments); };
exports.main = function commonjsMain(args) {
if (!args[1]) {
console.log('Usage: '+args[0]+' FILE');
process.exit(1);
}
var source = require('fs').readFileSync(require('path').normalize(args[1]), "utf8");
return exports.parser.parse(source);
};
if (typeof module !== 'undefined' && require.main === module) {
exports.main(process.argv.slice(1));
}
}