Function: vhdl-beginning-of-directive

vhdl-beginning-of-directive is a byte-compiled function defined in vhdl-mode.el.gz.

Signature

(vhdl-beginning-of-directive &optional LIM)

Documentation

Go to the beginning of a directive (nicked from cc-engine).

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/vhdl-mode.el.gz
(defun vhdl-beginning-of-directive (&optional _lim)
  "Go to the beginning of a directive (nicked from `cc-engine')."
  (let ((here (point)))
    (beginning-of-line)
    (while (eq (char-before (1- (point))) ?\\)
      (forward-line -1))
    (back-to-indentation)
    (if (and (<= (point) here)
	     (eq (char-after) ?`))
	t
      (goto-char here)
      nil)))