Function: beginning-of-icon-defun

beginning-of-icon-defun is an interactive and byte-compiled function defined in icon.el.gz.

Signature

(beginning-of-icon-defun)

Documentation

Go to the start of the enclosing procedure; return t if at top level.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/icon.el.gz
(defun beginning-of-icon-defun ()
  "Go to the start of the enclosing procedure; return t if at top level."
  (interactive)
  (if (re-search-backward "^procedure\\s \\|^end[ \t\n]" (point-min) 'move)
      (looking-at "e")
    t))