Permalink
Browse files

[fix] bsljsparse: identifier regexp.

  • Loading branch information...
1 parent b7d73a9 commit 350a0e594e7d6d411363e36e3a4975ead6ba47f3 @arthuraa arthuraa committed Aug 13, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 compiler/libbsl/bslJsParse.ml
View
2 compiler/libbsl/bslJsParse.ml
@@ -155,7 +155,7 @@ let try_read_args tag
aux None tags
let identifier_regexp =
- Str.regexp "^[ \t]*\\([a-zA-Z][a-zA-Z0-9]*\\)[ \t]*$"
+ Str.regexp "^[ \t]*\\([a-zA-Z_][a-zA-Z0-9_]*\\)[ \t]*$"
let get_identifier string =
if Str.string_match identifier_regexp string 0 then

0 comments on commit 350a0e5

Please sign in to comment.