aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorWilson Snyder2015-09-18 08:50:03 -0400
committerWilson Snyder2015-09-18 08:50:03 -0400
commitba3495674e8c6c98f2f180908b2af600a2bd3d2e (patch)
tree1ed47c50ac325693b921cfab48dc946dc111b2f5
parent17e5f43697992a0a3d3607013ee55b17b680f989 (diff)
downloademacs-ba3495674e8c6c98f2f180908b2af600a2bd3d2e.tar.gz
emacs-ba3495674e8c6c98f2f180908b2af600a2bd3d2e.zip
Fix checkdoc warnings.
* lisp/progmodes/verilog-mode.el (verilog-forward-sexp-function) (verilog-decls-princ) (verilog-modport-princ) (verilog-modi-modport-lookup-one): Fix checkdoc warnings.
-rw-r--r--lisp/progmodes/verilog-mode.el12
1 files changed, 7 insertions, 5 deletions
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index 3baf768052c..85733e16190 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -123,7 +123,7 @@
123;; 123;;
124 124
125;; This variable will always hold the version number of the mode 125;; This variable will always hold the version number of the mode
126(defconst verilog-mode-version "2015-08-16-ce03c7a-vpo-GNU" 126(defconst verilog-mode-version "2015-09-18-314cf1d-vpo-GNU"
127 "Version of this Verilog mode.") 127 "Version of this Verilog mode.")
128(defconst verilog-mode-release-emacs t 128(defconst verilog-mode-release-emacs t
129 "If non-nil, this version of Verilog mode was released with Emacs itself.") 129 "If non-nil, this version of Verilog mode was released with Emacs itself.")
@@ -3442,7 +3442,7 @@ Use filename, if current buffer being edited shorten to just buffer name."
3442 (verilog-forward-sexp)) 3442 (verilog-forward-sexp))
3443 3443
3444(defun verilog-forward-sexp-function (arg) 3444(defun verilog-forward-sexp-function (arg)
3445 "Move forward a sexp." 3445 "Move forward ARG sexps."
3446 ;; Used by hs-minor-mode 3446 ;; Used by hs-minor-mode
3447 (if (< arg 0) 3447 (if (< arg 0)
3448 (verilog-backward-sexp) 3448 (verilog-backward-sexp)
@@ -8129,7 +8129,8 @@ Tieoff value uses `verilog-active-low-regexp' and
8129;; 8129;;
8130 8130
8131(defun verilog-decls-princ (decls &optional header prefix) 8131(defun verilog-decls-princ (decls &optional header prefix)
8132 "For debug, dump the `verilog-read-decls' structure DECLS." 8132 "For debug, dump the `verilog-read-decls' structure DECLS.
8133Use optional HEADER and PREFIX."
8133 (when decls 8134 (when decls
8134 (if header (princ header)) 8135 (if header (princ header))
8135 (setq prefix (or prefix "")) 8136 (setq prefix (or prefix ""))
@@ -8173,7 +8174,7 @@ Tieoff value uses `verilog-active-low-regexp' and
8173 (princ "\n"))))) 8174 (princ "\n")))))
8174 8175
8175(defun verilog-modport-princ (modports &optional header prefix) 8176(defun verilog-modport-princ (modports &optional header prefix)
8176 "For debug, dump internal MODPORT structures, with HEADER and PREFIX." 8177 "For debug, dump internal MODPORTS structures, with HEADER and PREFIX."
8177 (when modports 8178 (when modports
8178 (if header (princ header)) 8179 (if header (princ header))
8179 (while modports 8180 (while modports
@@ -9994,7 +9995,8 @@ and invalidating the cache."
9994 9995
9995 9996
9996(defun verilog-modi-modport-lookup-one (modi name &optional ignore-error) 9997(defun verilog-modi-modport-lookup-one (modi name &optional ignore-error)
9997 "Given a MODI, return the declarations related to the given modport NAME." 9998 "Given a MODI, return the declarations related to the given modport NAME.
9999Report errors unless optional IGNORE-ERROR."
9998 ;; Recursive routine - see below 10000 ;; Recursive routine - see below
9999 (let* ((realname (verilog-symbol-detick name t)) 10001 (let* ((realname (verilog-symbol-detick name t))
10000 (modport (assoc name (verilog-decls-get-modports (verilog-modi-get-decls modi))))) 10002 (modport (assoc name (verilog-decls-get-modports (verilog-modi-get-decls modi)))))