Big letters allowed in identfieirs git add haskell.parser.js

johang88 · Mar 18, 2010 · 35082bf · 35082bf
1 parent 97642fc
commit 35082bf
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/haskell.parser.js b/haskell.parser.js
@@ -47,7 +47,7 @@ haskell.parser.parse = function(code) {
 
     var integer = action(repeat1(range('0', '9')), function(ast) { return new haskell.ast.Num(parseInt(ast.join(""))); });
 
-    var ident_ = action(repeat0(choice(range('a', 'z'), range('0', '1'), '\'')), function(ast) { return ast.join(""); });
+    var ident_ = action(repeat0(choice('A', 'Z'), choice(range('a', 'z'), range('0', '1'), '\'')), function(ast) { return ast.join(""); });
     var ident = action(butnot(sequence(range('a', 'z'), ident_), reservedid), function(ast) { return ast.join(""); });
 
     var literal = ws(integer);