Function: verilog-get-lineup-indent

verilog-get-lineup-indent is a byte-compiled function defined in verilog-mode.el.gz.

Signature

(verilog-get-lineup-indent B EDPOS)

Documentation

Return the indent level that will line up several lines within the region.

Region is defined by B and EDPOS.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/verilog-mode.el.gz
(defun verilog-get-lineup-indent (b edpos)
  "Return the indent level that will line up several lines within the region.
Region is defined by B and EDPOS."
  (save-excursion
    (let ((ind 0) e)
      (goto-char b)
      ;; Get rightmost position
      (while (progn (setq e (marker-position edpos))
		    (< (point) e))
	(when (verilog-re-search-forward (verilog-get-declaration-re 'iface-mp) e 'move)
	  (goto-char (match-end 0))
	  (verilog-backward-syntactic-ws)
	  (if (> (current-column) ind)
	      (setq ind (current-column)))
          (goto-char (match-end 0))
          (forward-line 1)))
      (if (> ind 0)
	  (1+ ind)
	;; No lineup-string found
	(goto-char b)
	(end-of-line)
	(verilog-backward-syntactic-ws)
	;;(skip-chars-backward " \t")
	(1+ (current-column))))))