From: Glenn Morris <rgm@gnu.org>
Date: Sat, 17 May 2008 20:08:54 +0000 (+0000)
Subject: (fortran-font-lock-keywords-2): Add .eqv., .neqv.
X-Git-Tag: emacs-pretest-23.0.90~5465
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ac342f28c0d4c7d6e9b73ae22853d60f1cd80e9e;p=emacs.git

(fortran-font-lock-keywords-2): Add .eqv., .neqv.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3b87fa0e02b..e0c77499698 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-05-17  Glenn Morris  <rgm@gnu.org>
+
+	* progmodes/fortran.el (fortran-font-lock-keywords-2): Add .eqv., .neqv.
+
 2008-05-17  Andreas Schwab  <schwab@suse.de>
 
 	* vc-dispatcher.el (vc-dir-mode-map): Fix M-down and M-up binding.
diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index 467237ae1a6..846828dc971 100644
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -389,8 +389,8 @@ program\\|subroutine\\)\\>[ \t]*\\(\\sw+\\)?"
                           'paren) "\\>")
            ;; Builtin operators.
            (concat "\\." (regexp-opt
-                          '("and" "or" "not" "lt" "le" "eq" "ge"
-                            "gt" "ne" "true" "false")
+                          '("and" "eq" "eqv" "false" "ge" "gt" "le" "lt" "ne"
+                            "neqv" "not" "or" "true")
                           'paren) "\\.")
            ;; do/goto keywords and targets, and goto tags.
            '("\\<\\(do\\|go *to\\)\\>[ \t]*\\([0-9]+\\)?"