Function: vhdl-speedbar-update-units

vhdl-speedbar-update-units is a byte-compiled function defined in vhdl-mode.el.gz.

Signature

(vhdl-speedbar-update-units TEXT UNIT-LIST FILE-NAME FACE &optional POS)

Documentation

Help function to highlight design units.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/vhdl-mode.el.gz
(defun vhdl-speedbar-update-units (text unit-list file-name face
					&optional pos)
  "Help function to highlight design units."
  (while unit-list
    (goto-char (point-min))
    (while (re-search-forward
	    (concat text "\\(" (car unit-list) "\\)\\>") nil t)
      (when (equal file-name (car (get-text-property
				   (match-beginning 1) 'speedbar-token)))
	(setq pos (or pos (point-marker)))
	(put-text-property (match-beginning 1) (match-end 1) 'face face)))
    (setq unit-list (cdr unit-list)))
  pos)