Mercurial > emacs

comparison lisp/progmodes/dcl-mode.el @ 60767:66c8a6842570

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(dcl-font-lock-keywords): Add underscore to "f$ lexicals" regexp.
author Thien-Thi Nguyen <ttn@gnuvola.org>
date Mon, 21 Mar 2005 07:42:44 +0000
parents 634b2aa97a80
children f2892faa87d4 13796b0653c7
comparison
equal deleted inserted replaced
60766:a4cac40cf780 60767:66c8a6842570
76 ;; First, font lock. This is a minimal approach, please improve! 76 ;; First, font lock. This is a minimal approach, please improve!
77 77
78 (defvar dcl-font-lock-keywords 78 (defvar dcl-font-lock-keywords
79 '(("\\<\\(if\\|then\\|else\\|endif\\)\\>" 79 '(("\\<\\(if\\|then\\|else\\|endif\\)\\>"
80 1 font-lock-keyword-face) 80 1 font-lock-keyword-face)
81 ("\\<f[$][a-z]+\\>" 81 ("\\<f[$][a-z_]+\\>"
82 0 font-lock-builtin-face) 82 0 font-lock-builtin-face)
83 ("[.]\\(eq\\|not\\|or\\|and\\|lt\\|gt\\|le\\|ge\\|eqs\\|nes\\)[.]" 83 ("[.]\\(eq\\|not\\|or\\|and\\|lt\\|gt\\|le\\|ge\\|eqs\\|nes\\)[.]"
84 0 font-lock-builtin-face)) 84 0 font-lock-builtin-face))
85 "Font lock keyword specification for DCL mode. 85 "Font lock keyword specification for DCL mode.
86 Presently this includes some syntax, .OP.erators, and \"f$\" lexicals.") 86 Presently this includes some syntax, .OP.erators, and \"f$\" lexicals.")