From ff80687aee5da42ff151df4e68f8dbcd2f8b2be3 Mon Sep 17 00:00:00 2001
From: Glenn Morris
Date: Sun, 1 Nov 2015 18:25:42 -0800
Subject: * lisp/progmodes/f90.el (f90-no-block-limit):

Add associate.  (Bug#21794)
* test/automated/f90.el (f90-test-bug21794): New test.
---
 lisp/progmodes/f90.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lisp')

diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el
index 5c938fd1a93..0e333f1f7ed 100644
--- a/lisp/progmodes/f90.el
+++ b/lisp/progmodes/f90.el
@@ -1452,7 +1452,7 @@ if all else fails."
     (not (or (looking-at "end")
              (looking-at "\\(do\\|if\\|else\\(if\\|where\\)?\
 \\|select[ \t]*\\(case\\|type\\)\\|case\\|where\\|forall\\|\
-block\\|critical\\|enum\\)\\_>")
+block\\|critical\\|enum\\|associate\\)\\_>")
              (looking-at "\\(program\\|\\(?:sub\\)?module\\|\
 \\(?:abstract[ \t]*\\)?interface\\|block[ \t]*data\\)\\_>")
              (looking-at "\\(contains\\|\\(?:\\sw\\|\\s_\\)+[ \t]*:\\)")
-- 
cgit v1.2.1