Mercurial > emacs
comparison lisp/progmodes/fortran.el @ 95065:36c19ba93dca
(fortran-font-lock-keywords-2): Add .eqv., .neqv.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Sat, 17 May 2008 20:08:37 +0000 |
| parents | cc066d4b866e |
| children | 1d1f23bbdc81 |
comparison
equal
deleted
inserted
replaced
| 95064:b5f69b7c5d16 | 95065:36c19ba93dca |
|---|---|
| 387 "cycle" "exit" "rewind" "backspace" | 387 "cycle" "exit" "rewind" "backspace" |
| 388 "where" "elsewhere") | 388 "where" "elsewhere") |
| 389 'paren) "\\>") | 389 'paren) "\\>") |
| 390 ;; Builtin operators. | 390 ;; Builtin operators. |
| 391 (concat "\\." (regexp-opt | 391 (concat "\\." (regexp-opt |
| 392 '("and" "or" "not" "lt" "le" "eq" "ge" | 392 '("and" "eq" "eqv" "false" "ge" "gt" "le" "lt" "ne" |
| 393 "gt" "ne" "true" "false") | 393 "neqv" "not" "or" "true") |
| 394 'paren) "\\.") | 394 'paren) "\\.") |
| 395 ;; do/goto keywords and targets, and goto tags. | 395 ;; do/goto keywords and targets, and goto tags. |
| 396 '("\\<\\(do\\|go *to\\)\\>[ \t]*\\([0-9]+\\)?" | 396 '("\\<\\(do\\|go *to\\)\\>[ \t]*\\([0-9]+\\)?" |
| 397 (1 font-lock-keyword-face) | 397 (1 font-lock-keyword-face) |
| 398 (2 font-lock-constant-face nil t)) | 398 (2 font-lock-constant-face nil t)) |