[nongnu] externals/caml 6af733d 036/197: passage aux labels stricts

[Stefan Monnier]

branch: externals/caml
commit 6af733d55a83f8d6f6ab8aa6ddb45cc4e8d8a855
Author: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>
Commit: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>

    passage aux labels stricts
    
    
    git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3696 
f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 caml-font.el  | 4 ++--
 caml-hilit.el | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/caml-font.el b/caml-font.el
index 7cf780a..5c9ae35 100644
--- a/caml-font.el
+++ b/caml-font.el
@@ -65,9 +65,9 @@
          'font-lock-reference-face)
    '("\\<raise\\>" . font-lock-comment-face)
 ;labels (and open)
-   '("\\(\\([~?]\\|\\<\\)[a-z][a-z0-9_']*:\\)[^:=]" 1
+   '("\\(\\([~?]\\|\\<\\)[a-z][a-zA-Z0-9_']*:\\)[^:=]" 1
      font-lock-variable-name-face)
-   '("\\<\\(assert\\|open\\|include\\)\\>\\|[~?][ (]*[a-z][a-z0-9_']*"
+   '("\\<\\(assert\\|open\\|include\\)\\>\\|[~?][ (]*[a-z][a-zA-Z0-9_']*"
      . font-lock-variable-name-face)))
 
 (defconst inferior-caml-font-lock-keywords
diff --git a/caml-hilit.el b/caml-hilit.el
index 72cc814..21a5870 100644
--- a/caml-hilit.el
+++ b/caml-hilit.el
@@ -16,8 +16,8 @@
          nil
          'string)
 ;labels
-   '("\\(\\([~?]\\|\\<\\)[a-z][a-z0-9_']*:\\)[^:=]" 1 brown)
-   '("[~?][ (]*[a-z][a-z0-9_']*" nil brown)
+   '("\\(\\([~?]\\|\\<\\)[a-z][a-zA-Z0-9_']*:\\)[^:=]" 1 brown)
+   '("[~?][ (]*[a-z][a-zA-Z0-9_']*" nil brown)
 ;modules
    '("\\<\\(assert\\|open\\|include\\)\\>" nil brown)
    '("`?\\<[A-Z][A-Za-z0-9_\']*\\>" nil MidnightBlue)