diff options
author | rdaneelolivaw <devnull@localhost> | 2005-12-14 11:35:52 +0000 |
---|---|---|
committer | rdaneelolivaw <devnull@localhost> | 2005-12-14 11:35:52 +0000 |
commit | a5ae462a35b9ad60f0f9399043142648d4f79a45 (patch) | |
tree | 063db47ef8dae2d89d5cfc94bee01e95ea81ec88 /src | |
parent | 49c0e1510836199ba00787bc0c805a81bdc2a886 (diff) | |
download | scintilla-mirror-a5ae462a35b9ad60f0f9399043142648d4f79a45.tar.gz |
RBR - slight tightening of OCaml `TAG recognition
Diffstat (limited to 'src')
-rw-r--r-- | src/LexCaml.cxx | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/LexCaml.cxx b/src/LexCaml.cxx index a418ab19c..6c2e83705 100644 --- a/src/LexCaml.cxx +++ b/src/LexCaml.cxx @@ -202,13 +202,13 @@ void ColouriseCamlDoc( // it's wide open; what do we have? if (iscamlf(sc.ch)) state2 = SCE_CAML_IDENTIFIER; - else if (sc.Match('`')) + else if (sc.Match('`') && isalpha(sc.chNext)) state2 = SCE_CAML_TAGNAME; else if (sc.Match('#') && isdigit(sc.chNext)) state2 = SCE_CAML_LINENUM; else if (isdigit(sc.ch)) { state2 = SCE_CAML_NUMBER, chBase = 10; - if (sc.ch == '0' && strchr("bBoOxX", sc.chNext)) + if (sc.Match('0') && strchr("bBoOxX", sc.chNext)) chBase = baseT[tolower(sc.chNext) - 'a'], sc.Forward(); } else if (sc.Match('\'')) /* (char literal?) */ state2 = SCE_CAML_CHAR, chLit = 0; |