Variable: fortran-end-block-re
fortran-end-block-re is a variable defined in fortran.el.gz.
Value
"^[ 0-9]*\\<end[ ]*\\(block[ ]*data\\|select[ ]*case\\|\\(?:do\\|function\\|i\\(?:f\\|nterface\\)\\|map\\|program\\|s\\(?:\\(?:tructur\\|ubroutin\\)e\\)\\|union\\|where\\)\\|!\\|$\\)"
Documentation
Regexp matching the end of a Fortran "block", from the line start.
Note that only ENDDO is handled for the end of a DO-loop. Used
in the Fortran entry in hs-special-modes-alist.
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/fortran.el.gz
(defconst fortran-end-block-re
;; Do-loops terminated by things other than ENDDO cannot be handled
;; with a regexp. This omission does not seem to matter to hideshow...
(concat "^[ \t0-9]*\\<end[ \t]*\\("
fortran-blocks-re
;; Naked END statement.
"\\|!\\|$\\)")
"Regexp matching the end of a Fortran \"block\", from the line start.
Note that only ENDDO is handled for the end of a DO-loop. Used
in the Fortran entry in `hs-special-modes-alist'.")