aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/util.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/util.ml b/lib/util.ml
index 3203d0f78..d80f09062 100644
--- a/lib/util.ml
+++ b/lib/util.ml
@@ -48,7 +48,8 @@ let is_letter c =
let is_digit c = (c >= '0' && c <= '9')
-let is_ident_tail c = is_letter c or is_digit c or c = '\''
+let is_ident_tail c =
+ is_letter c or is_digit c or c = '\'' or c = '_'
(* Strings *)