Mercurial > emacs
comparison lisp/progmodes/fortran.el @ 80583:3299f73f467e
(fortran-font-lock-keywords-2): Add keywords for
logic operators .eqv. and .neqv.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Sun, 18 May 2008 04:16:57 +0000 |
| parents | a1342e6e097a |
| children | 3c8c80b9ca33 |
comparison
equal
deleted
inserted
replaced
| 80582:7c7ae81f80df | 80583:3299f73f467e |
|---|---|
| 358 "where" "elsewhere") | 358 "where" "elsewhere") |
| 359 'paren) "\\>") | 359 'paren) "\\>") |
| 360 ;; Builtin operators. | 360 ;; Builtin operators. |
| 361 (concat "\\." (regexp-opt | 361 (concat "\\." (regexp-opt |
| 362 '("and" "or" "not" "lt" "le" "eq" "ge" | 362 '("and" "or" "not" "lt" "le" "eq" "ge" |
| 363 "gt" "ne" "true" "false") | 363 "gt" "ne" "eqv" "neqv" "true" "false") |
| 364 'paren) "\\.") | 364 'paren) "\\.") |
| 365 ;; do/goto keywords and targets, and goto tags. | 365 ;; do/goto keywords and targets, and goto tags. |
| 366 '("\\<\\(do\\|go *to\\)\\>[ \t]*\\([0-9]+\\)?" | 366 '("\\<\\(do\\|go *to\\)\\>[ \t]*\\([0-9]+\\)?" |
| 367 (1 font-lock-keyword-face) | 367 (1 font-lock-keyword-face) |
| 368 (2 font-lock-constant-face nil t)) | 368 (2 font-lock-constant-face nil t)) |