Mercurial > repos > tabletprog

comparison parser.js @ 142:833624457b81

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge
author Mike Pavone <pavone@retrodev.com>
date Fri, 09 Aug 2013 01:37:09 -0700
parents 5bcaddff29f5
children 9de2572a34a7 18598163e3ef
comparison
equal deleted inserted replaced
141:15aac5334b64 142:833624457b81
13 } 13 }
14 symbol.prototype.cleanName = function() { 14 symbol.prototype.cleanName = function() {
15 return this.name[0] == ':' ? this.name.substr(1) : this.name; 15 return this.name[0] == ':' ? this.name.substr(1) : this.name;
16 } 16 }
17 17
18 function intlit(val) 18 function intlit(val, bits)
19 { 19 {
20 if (!bits) {
21 bits = 32;
22 }
23 this.bits = bits;
20 this.val = val; 24 this.val = val;
21 } 25 }
22 26
23 function floatlit(val) 27 function floatlit(val)
24 { 28 {
75 'ws = ([ \\t\\n\\r] / "//" [^\\n]* "\\n")*;' + 79 'ws = ([ \\t\\n\\r] / "//" [^\\n]* "\\n")*;' +
76 'hws = ([ \\t] / "/*" ([^*] / "*" ! "/")* "*/" )*;' + 80 'hws = ([ \\t] / "/*" ([^*] / "*" ! "/")* "*/" )*;' +
77 'expr = e:(funcall / methcall / opexpr) ws { return e; };' + 81 'expr = e:(funcall / methcall / opexpr) ws { return e; };' +
78 'opexpr = left:compareop pieces:(hws ("&&" / "||") hws compareop)* { if (pieces.length) { var cur = new op(left, pieces[0][1], pieces[0][3]); for (var i = 1; i < pieces.length; i++) { cur = new op(cur, pieces[i][1], pieces[i][3]); } return cur; } else { return left; } };'+ 82 'opexpr = left:compareop pieces:(hws ("&&" / "||") hws compareop)* { if (pieces.length) { var cur = new op(left, pieces[0][1], pieces[0][3]); for (var i = 1; i < pieces.length; i++) { cur = new op(cur, pieces[i][1], pieces[i][3]); } return cur; } else { return left; } };'+
79 'compareop = left:addsub pieces:(hws ("<=" / ">=" / "<" / ">" / "=" / "!=") hws addsub)* { if (pieces.length) { var cur = new op(left, pieces[0][1], pieces[0][3]); for (var i = 1; i < pieces.length; i++) { cur = new op(cur, pieces[i][1], pieces[i][3]); } return cur; } else { return left; } };'+ 83 'compareop = left:addsub pieces:(hws ("<=" / ">=" / "<" / ">" / "=" / "!=") hws addsub)* { if (pieces.length) { var cur = new op(left, pieces[0][1], pieces[0][3]); for (var i = 1; i < pieces.length; i++) { cur = new op(cur, pieces[i][1], pieces[i][3]); } return cur; } else { return left; } };'+
80 'addsub = left:muldiv pieces:(hws ("+"/"-"/"xor"/".") hws muldiv)* { if (pieces.length) { var cur = new op(left, pieces[0][1], pieces[0][3]); for (var i = 1; i < pieces.length; i++) { cur = new op(cur, pieces[i][1], pieces[i][3]); } return cur; } else { return left; } };'+ 84 'addsub = left:muldiv pieces:(hws ("+"/"-"/"xor"/"and"/"or"/".") hws muldiv)* { if (pieces.length) { var cur = new op(left, pieces[0][1], pieces[0][3]); for (var i = 1; i < pieces.length; i++) { cur = new op(cur, pieces[i][1], pieces[i][3]); } return cur; } else { return left; } };'+
81 'muldiv = left:primlitsym pieces:(hws ("*"/"/"/"%") hws primlitsym)* { if (pieces.length) { var cur = new op(left, pieces[0][1], pieces[0][3]); for (var i = 1; i < pieces.length; i++) { cur = new op(cur, pieces[i][1], pieces[i][3]); } return cur; } else { return left; } };'+ 85 'muldiv = left:primlitsym pieces:(hws ("*"/"/"/"%") hws primlitsym)* { if (pieces.length) { var cur = new op(left, pieces[0][1], pieces[0][3]); for (var i = 1; i < pieces.length; i++) { cur = new op(cur, pieces[i][1], pieces[i][3]); } return cur; } else { return left; } };'+
82 'primlitsym = hws val:(float / hex / binary / int / string / symbol / object / array / list / lambda / "(" ws expr:expr hws ")" { return expr; }) { return val; };' + 86 'primlitsym = hws val:(float / hex / binary / int / string / symbol / object / array / list / lambda / "(" ws expr:expr hws ")" { return expr; }) { return val; };' +
83 'symbol = chars:[a-zA-Z_!?@]+ trailing:(":"? [a-zA-Z_!?@0-9])* ! ":" { for (var i = 0; i < trailing.length; i++) { trailing[i] = trailing[i].join(""); } return new symbol(chars.join("") + trailing.join("")); };' + 87 'symbol = chars:[a-zA-Z_!?@]+ trailing:(":"? [a-zA-Z_!?@0-9])* ! ":" { for (var i = 0; i < trailing.length; i++) { trailing[i] = trailing[i].join(""); } return new symbol(chars.join("") + trailing.join("")); };' +
84 'float = digits:[0-9]+ "." decimals:[0-9]+ { return new floatlit(parseFloat(digits.join("") + "." + decimals.join(""))); };' + 88 'float = digits:[0-9]+ "." decimals:[0-9]+ { return new floatlit(parseFloat(digits.join("") + "." + decimals.join(""))); };' +
85 'binary = "0b" digits:[01]+ { return new intlit(parseInt(digits.join(""), 2)); };' + 89 'binary = "0b" digits:[01]+ { return new intlit(parseInt(digits.join(""), 2)); };' +
86 'hex = "0x" digits:[0-9a-fA-F]+ { return new intlit(parseInt(digits.join(""), 16)); };' + 90 'hex = "0x" digits:[0-9a-fA-F]+ size:("i" ("8" / "16" / "32" / "64"))? { var bits = size ? parseInt(size[1], 10) : 0; return new intlit(parseInt(digits.join(""), 16), bits); };' +
87 'int = sign:"-"? digits:[0-9]+ { return new intlit(parseInt(sign + digits.join(""), 10)); };' + 91 'int = sign:"-"? digits:[0-9]+ size:("i" ("8" / "16" / "32" / "64"))? { var bits = size ? parseInt(size[1], 10) : 0; return new intlit(parseInt(sign + digits.join(""), 10), bits); };' +
88 'string = "\\"" text:(strpart/escape)* "\\"" { return new strlit(text.join("")); };' + 92 'string = "\\"" text:(strpart/escape)* "\\"" { return new strlit(text.join("")); };' +
89 'strpart = text:[^\\"\\\\]+ { return text.join(""); };' + 93 'strpart = text:[^\\"\\\\]+ { return text.join(""); };' +
90 'escape = "\\\\" char:[nt\\"r\\\\] { if (char == "n") { return "\\n"; } if (char == "r") { return "\\r"; } return char; };' + 94 'escape = "\\\\" char:[nt\\"r\\\\] { if (char == "n") { return "\\n"; } if (char == "r") { return "\\r"; } return char; };' +
91 'object = "#{" ws messages:(assignment / funexpr)* "}" { return new object(messages); };' + 95 'object = "#{" ws messages:(assignment / funexpr)* "}" { return new object(messages); };' +
92 'array = "#[" ws els:opexpr* "]" { return new arraylit(els); };' + 96 'array = "#[" ws els:opexpr* "]" { return new arraylit(els); };' +