Function: fortran-end-of-subprogram
fortran-end-of-subprogram is an interactive and byte-compiled function
defined in fortran.el.gz.
Signature
(fortran-end-of-subprogram)
Documentation
Move point to the end of the current Fortran subprogram.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/fortran.el.gz
;; This is simpler than f-beginning-of-s because the end of a
;; subprogram is never implicit.
(defun fortran-end-of-subprogram ()
"Move point to the end of the current Fortran subprogram."
(interactive)
(let ((case-fold-search t))
(beginning-of-line)
(save-match-data
(while (and (re-search-forward fortran-end-prog-re nil 'move)
(not (fortran-check-end-prog-re))))
(forward-line))))