Mercurial > repos > tabletprog

comparison parser.js @ 214:e01137a97654

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make assignments an expression in the grammar
author Michael Pavone <pavone@retrodev.com>
date Fri, 06 Dec 2013 19:19:54 -0800
parents 810edf474f86
children adad61ea2f3a
comparison
equal deleted inserted replaced
213:e00a8bc6361b 214:e01137a97654
80 80
81 var grammar = 81 var grammar =
82 'start = ws module:(object / lambda) ws { return module; };' + 82 'start = ws module:(object / lambda) ws { return module; };' +
83 'ws = ([ \\t\\n\\r] / "//" [^\\n]* "\\n")*;' + 83 'ws = ([ \\t\\n\\r] / "//" [^\\n]* "\\n")*;' +
84 'hws = ([ \\t] / "/*" ([^*] / "*" ! "/")* "*/" )*;' + 84 'hws = ([ \\t] / "/*" ([^*] / "*" ! "/")* "*/" )*;' +
85 'expr = e:(funcall / methcall / opexpr) ws { return e; };' + 85 'expr = e:(funcall / methcall / assignment / opexpr) ws { return e; };' +
86 '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; } };'+ 86 '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; } };'+
87 'compareop = left:maybecons pieces:(hws ("<=" / ">=" / "<" / ">" / "=" / "!=") hws maybecons)* { 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; } };'+ 87 'compareop = left:maybecons pieces:(hws ("<=" / ">=" / "<" / ">" / "=" / "!=") hws maybecons)* { 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; } };'+
88 'maybecons = consop / addsub;' + 88 'maybecons = consop / addsub;' +
89 'consop = left:addsub hws "|" hws right:maybecons { return new op(left, "|", right); };'+ 89 'consop = left:addsub hws "|" hws right:maybecons { return new op(left, "|", right); };'+
90 '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; } };'+ 90 '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; } };'+
101 'object = "#{" ws messages:(assignment / funexpr)* "}" { return new object(messages); };' + 101 'object = "#{" ws messages:(assignment / funexpr)* "}" { return new object(messages); };' +
102 'array = "#[" ws els:expr* "]" { return new arraylit(els); };' + 102 'array = "#[" ws els:expr* "]" { return new arraylit(els); };' +
103 'list = "[" ws els:expr* "]" { return new listlit(els); };' + 103 'list = "[" ws els:expr* "]" { return new listlit(els); };' +
104 'opsym = name:("&&" / "||" / "<=" / ">=" / "<" / ">" / "=" / "!=" / "+" / "-" / "." / "*" / "/" / "%" / "|") { return new symbol(name); };' + 104 'opsym = name:("&&" / "||" / "<=" / ">=" / "<" / ">" / "=" / "!=" / "+" / "-" / "." / "*" / "/" / "%" / "|") { return new symbol(name); };' +
105 'assignment = ws sym:(opsym / symbol) hws "<-" expr:expr ws { return new assignment(sym, expr); }' + 105 'assignment = ws sym:(opsym / symbol) hws "<-" expr:expr ws { return new assignment(sym, expr); }' +
106 'lambda = args:((& ":") argname+ )? "{" ws exprs:(assignment / expr)* "}" { return new lambda(args[1], exprs); };' + 106 'lambda = args:((& ":") argname+ )? "{" ws exprs:expr* "}" { return new lambda(args[1], exprs); };' +
107 'argname = init:":"? chars:[a-zA-Z_!?@]+ trailing:[a-zA-Z_!?@0-9]* hws { return new symbol(init + chars.join("") + trailing.join("")); };' + 107 'argname = init:":"? chars:[a-zA-Z_!?@]+ trailing:[a-zA-Z_!?@0-9]* hws { return new symbol(init + chars.join("") + trailing.join("")); };' +
108 'funexpr = f: funcall ws { return f; };' + 108 'funexpr = f: funcall ws { return f; };' +
109 'funcall = hws parts: funcallpart+ { var fun = ""; var args = []; for (var i = 0; i < parts.length; i++) { fun += parts[i].name; args = args.concat(parts[i].args); } return new funcall(fun, args); };' + 109 'funcall = hws parts: funcallpart+ { var fun = ""; var args = []; for (var i = 0; i < parts.length; i++) { fun += parts[i].name; args = args.concat(parts[i].args); } return new funcall(fun, args); };' +
110 'funcallpart = fun:funpart args:opexpr* hws { return { name: fun, args: args}; };' + 110 'funcallpart = fun:funpart args:opexpr* hws { return { name: fun, args: args}; };' +
111 'funpart = chars:[a-zA-Z_!?@]+ middle:[a-zA-Z_!?@0-9]* ":" & [ \\t\\n\\r] { return chars.join("") + middle.join("") + ":"; };' + 111 'funpart = chars:[a-zA-Z_!?@]+ middle:[a-zA-Z_!?@0-9]* ":" & [ \\t\\n\\r] { return chars.join("") + middle.join("") + ":"; };' +