fix(emacs/lean-syntax): glitch on syntax highlight

This commit is contained in:
Leonardo de Moura 2014-10-11 10:44:30 -07:00
parent 1cc8007b9a
commit 6a40f80612

View file

@ -104,11 +104,10 @@
(,(rx (or "λ" "" "" "" ":=")) . 'font-lock-constant-face ) (,(rx (or "λ" "" "" "" ":=")) . 'font-lock-constant-face )
;; universe/inductive/theorem... "names" ;; universe/inductive/theorem... "names"
(,(rx word-start (,(rx word-start
(group (or "universe" "inductive" "theorem" "axiom" "lemma" "hypothesis" (group (or "inductive" "theorem" "axiom" "lemma" "hypothesis" "definition" "constant"))
"definition" "variable" "constant" "parameter"))
word-end word-end
(zero-or-more (or whitespace "(" "{" "[")) (zero-or-more (or whitespace "(" "{" "["))
(group (zero-or-more (not whitespace)))) (group (zero-or-more (not (any " \t\n\r")))))
(2 'font-lock-function-name-face)) (2 'font-lock-function-name-face))
("\\(set_option\\)[ \t]*\\([^ \t\n]*\\)" (2 'font-lock-constant-face)) ("\\(set_option\\)[ \t]*\\([^ \t\n]*\\)" (2 'font-lock-constant-face))
;; place holder ;; place holder