emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] externals/caml 5569e23 189/197: Handle identifiers in comments


From: Stefan Monnier
Subject: [nongnu] externals/caml 5569e23 189/197: Handle identifiers in comments
Date: Sat, 21 Nov 2020 01:20:04 -0500 (EST)

branch: externals/caml
commit 5569e231945158919d9c03f75e7d0f444692157d
Author: Pieter Goetschalckx <3.14.e.ter@gmail.com>
Commit: Pieter Goetschalckx <3.14.e.ter@gmail.com>

    Handle identifiers in comments
---
 caml-font.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/caml-font.el b/caml-font.el
index cea988e..3a534ff 100644
--- a/caml-font.el
+++ b/caml-font.el
@@ -184,7 +184,7 @@
 ; match any sequence of non-special characters in a comment
 ; note: this is only to go faster than one character at a time
 (defconst caml-font-other-comment-re
-  "[^{(*\"'\012\015]+"
+  "[^A-Za-z_\300-\326\330-\366\370-\377{(*\"'\012\015]+"
 )
 
 ; match any sequence of non-special characters in a string
@@ -299,6 +299,8 @@
          ((looking-at caml-font-newline-re)
           (goto-char (match-end 0))
           (setq continue (caml-font-put-state (match-end 0) (cons nil depth))))
+         ((caml-font-looking-at caml-font-ident-re)
+          (goto-char (match-end 0)))
          ((caml-font-looking-at caml-font-other-comment-re)
           (goto-char (match-end 0)))
          (t



reply via email to

[Prev in Thread] Current Thread [Next in Thread]