Mercurial > repos > tabletprog

comparison parser.js @ 56:a9bf3ffb6379

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix escape for backslash
author Mike Pavone <pavone@retrodev.com>
date Fri, 13 Jul 2012 21:28:37 -0700
parents 9482a0afe07c
children 08ae75d90dc2
comparison
equal deleted inserted replaced
55:93ddb4ad6fcb 56:a9bf3ffb6379
83 'binary = "0b" digits:[01]+ { return new intlit(parseInt(digits.join(""), 2)); };' + 83 'binary = "0b" digits:[01]+ { return new intlit(parseInt(digits.join(""), 2)); };' +
84 'hex = "0x" digits:[0-9a-fA-F]+ { return new intlit(parseInt(digits.join(""), 16)); };' + 84 'hex = "0x" digits:[0-9a-fA-F]+ { return new intlit(parseInt(digits.join(""), 16)); };' +
85 'int = digits:[0-9]+ { return new intlit(parseInt(digits.join(""), 10)); };' + 85 'int = digits:[0-9]+ { return new intlit(parseInt(digits.join(""), 10)); };' +
86 'string = "\\"" text:(strpart/escape)* "\\"" { return new strlit(text.join("")); };' + 86 'string = "\\"" text:(strpart/escape)* "\\"" { return new strlit(text.join("")); };' +
87 'strpart = text:[^\\"\\\\]+ { return text.join(""); };' + 87 'strpart = text:[^\\"\\\\]+ { return text.join(""); };' +
88 'escape = "\\\\" char:[nt\\"r] { if (char == "n") { return "\\n"; } if (char == "r") { return "\\r"; } return char; };' + 88 'escape = "\\\\" char:[nt\\"r\\\\] { if (char == "n") { return "\\n"; } if (char == "r") { return "\\r"; } return char; };' +
89 'object = "#{" ws messages:(assignment / funcall)* "}" { return new object(messages); };' + 89 'object = "#{" ws messages:(assignment / funcall)* "}" { return new object(messages); };' +
90 'array = "#[" ws els:opexpr* "]" { return new arraylit(els); };' + 90 'array = "#[" ws els:opexpr* "]" { return new arraylit(els); };' +
91 'list = "[" ws els:opexpr* "]" { return new listlit(els); };' + 91 'list = "[" ws els:opexpr* "]" { return new listlit(els); };' +
92 'assignment = ws sym:symbol hws "<-" expr:expr ws { return new assignment(sym, expr); }' + 92 'assignment = ws sym:symbol hws "<-" expr:expr ws { return new assignment(sym, expr); }' +
93 'lambda = args:((& ":") argname+ )? "{" ws exprs:(assignment / expr)* "}" { return new lambda(args[1], exprs); };' + 93 'lambda = args:((& ":") argname+ )? "{" ws exprs:(assignment / expr)* "}" { return new lambda(args[1], exprs); };' +