Mercurial > emacs
changeset 23607:6b2444d06348
(fortran-end-prog-re1): Fix the regexp.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Sun, 01 Nov 1998 16:52:39 +0000 |
| parents | 57e437a51073 |
| children | 3805e63b8caf |
| files | lisp/progmodes/fortran.el |
| diffstat | 1 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/fortran.el Sun Nov 01 08:46:04 1998 +0000 +++ b/lisp/progmodes/fortran.el Sun Nov 01 16:52:39 1998 +0000 @@ -899,7 +899,13 @@ (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))