procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(fortran-end-prog-re1): Fix the regexp.

Browse source
This commit is contained in:
Dave Love 1998-11-01 16:52:39 +00:00
parent d1f04130e0
commit 7b84ff901c
1 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/progmodes/fortran.el
View file

@ -899,7 +899,13 @@ Auto-indent does not happen if a numeric ARG is used."
(fortran-indent-line))))
(defvar fortran-end-prog-re1
"end\\b[ \t]*\\(\\(program\\|subroutine\\|function\\)[ \t]*\\)?[^ \t=\(a-z]")
;; `end' followed by optional block type name and then optional
;; symbol, then eol. In the absence of the block type name, the
;; trailing symbol would presumably be a sequence number in cols 72+.
"end\
\\([ \t]+\\(program\\|subroutine\\|function\\|block[ \t]*data\\)\\>\\)?\
[ \t]*\\(\\(\\sw\\|\\s_\\)+[ \t]*\\)?\
$")
(defvar fortran-end-prog-re
(concat "^[ \t0-9]*" fortran-end-prog-re1))