Mercurial > repos > tabletprog

comparison parser.js @ 2:454c0346f357

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added method call syntax and comparison operators
author Mike Pavone <pavone@retrodev.com>
date Mon, 19 Mar 2012 22:10:38 -0700
parents a57a12bdae96
children a2c3ac7fafa2
comparison
equal deleted inserted replaced
1:a57a12bdae96 2:454c0346f357
1 1
2 var grammar = 2 var grammar =
3 'start = ws module:(object / lambda) ws { return module; };' + 3 'start = ws module:(object / lambda) ws { return module; };' +
4 'ws = [ \\t\\n\\r]*;' + 4 'ws = [ \\t\\n\\r]*;' +
5 'hws = [ \\t]*;' + 5 'hws = [ \\t]*;' +
6 'expr = funcall / addsub;' + 6 'expr = e:(funcall / methcall / opexpr) ws { return e; };' +
7 'addsub = left:muldiv hws op:("+"/"-") hws right:addsub ws { return {type: "op", left: left, op: op, right: right }; } / muldiv;'+ 7 'opexpr = left:addsub hws op:("<=" / ">=" / "<" / ">" / "=") hws right:opexpr { return {type: "op", left: left, op: op, right: right }; } / addsub;' +
8 'addsub = left:muldiv hws op:("+"/"-") hws right:addsub { return {type: "op", left: left, op: op, right: right }; } / muldiv;'+
8 'muldiv = left:primlitsym hws op:("*"/"/") hws right:muldiv { return {type: "op", left: left, op: op, right: right }; } / primlitsym;'+ 9 'muldiv = left:primlitsym hws op:("*"/"/") hws right:muldiv { return {type: "op", left: left, op: op, right: right }; } / primlitsym;'+
9 'primlitsym = ws val:(float / int / string / symbol / object / lambda / "(" expr:expr hws ")" { return expr; }) { return val; };' + 10 'primlitsym = hws val:(float / int / string / symbol / object / lambda / "(" expr:expr hws ")" { return expr; }) { return val; };' +
10 'symbol = chars:[a-zA-Z_!?@]+ trailing:(":"? [a-zA-Z_!?@0-9~])* ! ":" { return {type: "symbol", name: chars.join("") + trailing.join("")}; };' + 11 'symbol = chars:[a-zA-Z_!?@]+ trailing:(":"? [a-zA-Z_!?@0-9])* ! ":" { return {type: "symbol", name: chars.join("") + trailing.join("")}; };' +
11 'float = digits:[0-9]+ "." decimals:[0-9]+ { return {type: "floatlit", value: parseFloat(digits.join("") + "." + decimals.join("")) }; };' + 12 'float = digits:[0-9]+ "." decimals:[0-9]+ { return {type: "floatlit", value: parseFloat(digits.join("") + "." + decimals.join("")) }; };' +
12 'int = digits:[0-9]+ { return {type: "intlit", value: parseInt(digits.join(""), 10)}; };' + 13 'int = digits:[0-9]+ { return {type: "intlit", value: parseInt(digits.join(""), 10)}; };' +
13 'string = "\\"" text:[^\\"]* "\\"" { return {type: "strlit", value: text.join("")}; };' + 14 'string = "\\"" text:[^\\"]* "\\"" { return {type: "strlit", value: text.join("")}; };' +
14 'object = "#{" messages:assignment* "}" { return {type: "object", messages: messages}; };' + 15 'object = "#{" ws messages:assignment* "}" { return {type: "object", messages: messages}; };' +
15 'assignment = ws sym:symbol hws "<-" expr:expr { return {type: "assignment", symbol: sym, expression: expr}; }' + 16 'assignment = hws sym:symbol hws "<-" expr:expr ws { return {type: "assignment", symbol: sym, expression: expr}; }' +
16 'lambda = args:((& ":") argname+ )? "{" exprs:(assignment / expr)* ws "}" { return {type: "lambda", args: args[1], expressions: exprs}; };' + 17 'lambda = args:((& ":") argname+ )? "{" ws exprs:(assignment / expr)* "}" { return {type: "lambda", args: args[1], expressions: exprs}; };' +
17 'argname = init:":"? chars:[a-zA-Z_!?@]+ trailing:[a-zA-Z_!?@0-9%]* hws { return {type: "symbol", name: init + chars.join("") + trailing.join("")}; };' + 18 'argname = init:":"? chars:[a-zA-Z_!?@]+ trailing:[a-zA-Z_!?@0-9]* hws { return {type: "symbol", name: init + chars.join("") + trailing.join("")}; };' +
18 'funcall = ws parts: funcallpart+ { var fun = ""; var args = []; for (var i in parts) { fun += parts[i].name; args = args.concat(parts[i].args); } return {type: "funcall", name: fun, args: args}; };' + 19 'funcall = hws parts: funcallpart+ { var fun = ""; var args = []; for (var i in parts) { fun += parts[i].name; args = args.concat(parts[i].args); } return {type: "funcall", name: fun, args: args}; };' +
19 'funcallpart = fun:funpart args:addsub* hws { return { name: fun, args: args}; };' + 20 'funcallpart = fun:funpart args:opexpr* hws { return { name: fun, args: args}; };' +
20 'funpart = chars:[a-zA-Z_!?@]+ middle:[a-zA-Z_!?@0-9#]* ":" & [ \\t\\n\\r] { return chars.join("") + middle.join("") + ":"; };'; 21 'funpart = chars:[a-zA-Z_!?@]+ middle:[a-zA-Z_!?@0-9]* ":" & [ \\t\\n\\r] { return chars.join("") + middle.join("") + ":"; };' +
22 'methcall = receiver:opexpr hws info:methcallrest { info.receiver = receiver; return info; };' +
23 'methcallrest = funcall / unarymeth;' +
24 'unarymeth = name:symbol { return {type: "funcall", name:name, args: []}; };';
21 var parser = PEG.buildParser(grammar); 25 var parser = PEG.buildParser(grammar);
22 26
23 //var parser = PEG.buildParser('start = expr; expr = int; int = digits:[0-9]+ { return parseInt(digits.join(""), 10); }'); 27 //var parser = PEG.buildParser('start = expr; expr = int; int = digits:[0-9]+ { return parseInt(digits.join(""), 10); }');
24 28
25 onReady(function() { 29 onReady(function() {