Function: verilog-inject-arg

verilog-inject-arg is a byte-compiled function defined in verilog-mode.el.gz.

Signature

(verilog-inject-arg)

Documentation

Inject AUTOARG into new code. See verilog-inject-auto.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/verilog-mode.el.gz
(defun verilog-inject-arg ()
  "Inject AUTOARG into new code.  See `verilog-inject-auto'."
  ;; Presume one module per file.
  (save-excursion
    (goto-char (point-min))
    (while (verilog-re-search-forward-quick "\\<\\(connect\\)?module\\>" nil t)
      (let ((endmodp (save-excursion
                      (verilog-re-search-forward-quick "\\<end\\(connect\\)?module\\>" nil t)
		       (point))))
	;; See if there's already a comment .. inside a comment so not verilog-re-search
	(when (not (re-search-forward "/\\*AUTOARG\\*/" endmodp t))
	  (verilog-re-search-forward-quick ";" nil t)
	  (backward-char 1)
	  (verilog-backward-syntactic-ws-quick)
	  (backward-char 1) ; Moves to paren that closes argdecl's
	  (when (looking-at ")")
	    (verilog-insert "/*AUTOARG*/")))))))