Commit b32a3d99 authored by Glenn Morris's avatar Glenn Morris
Browse files

(f90-looking-at-where-or-forall): Oops, defsubst, not defun.

parent 6f642004
......@@ -955,7 +955,7 @@ NAME is nil if the statement has no label."
(looking-at "then\\>")))
(list struct label))))))
(defun f90-looking-at-where-or-forall ()
(defsubst f90-looking-at-where-or-forall ()
"Return (KIND NAME) if a where or forall block starts after point.
NAME is nil if the statement has no label."
(save-excursion
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment