aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorJuanma Barranquero2008-02-18 15:01:55 +0000
committerJuanma Barranquero2008-02-18 15:01:55 +0000
commit1418c70196c7e60c6e45fafb07d6912dc8a75314 (patch)
tree7fe617f7c55c4172abc7f33e260b7e175b12c636 /lisp
parent871c637e2a3b33968679ad0aabbb0015d95f2e04 (diff)
downloademacs-1418c70196c7e60c6e45fafb07d6912dc8a75314.tar.gz
emacs-1418c70196c7e60c6e45fafb07d6912dc8a75314.zip
(verilog-mode-version, verilog-mode-release-date, erilog-mode-release-emacs,
verilog-linter, verilog-coverage, erilog-simulator, verilog-compiler, erilog-auto-sense-defines-constant, verilog-company, erilog-project, verilog-mark-defun, verilog-submit-bug-report): Fix typos in docstrings.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog7
-rw-r--r--lisp/progmodes/verilog-mode.el46
2 files changed, 29 insertions, 24 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b335ada06d7..17f99307ee6 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -18,7 +18,12 @@
18 (verilog-add-list-unique, verilog-symbol-detick, verilog-modi-filename) 18 (verilog-add-list-unique, verilog-symbol-detick, verilog-modi-filename)
19 (verilog-auto-star, verilog-auto-inst, verilog-auto-wire) 19 (verilog-auto-star, verilog-auto-inst, verilog-auto-wire)
20 (verilog-enum-ascii, verilog-sk-begin, verilog-sk-fork) 20 (verilog-enum-ascii, verilog-sk-begin, verilog-sk-fork)
21 (verilog-sk-datadef, verilog-colorize-include-files-buffer): 21 (verilog-sk-datadef, verilog-colorize-include-files-buffer)
22 (verilog-mode-version, verilog-mode-release-date)
23 (verilog-mode-release-emacs, verilog-linter, verilog-coverage)
24 (verilog-simulator, verilog-compiler)
25 (verilog-auto-sense-defines-constant, verilog-company)
26 (verilog-project, verilog-mark-defun, verilog-submit-bug-report):
22 Fix typos in docstrings. 27 Fix typos in docstrings.
23 (verilog-set-auto-endcomments, verilog-calculate-indent) 28 (verilog-set-auto-endcomments, verilog-calculate-indent)
24 (verilog-inject-auto, verilog-auto-arg, verilog-auto-inout-module): 29 (verilog-inject-auto, verilog-auto-arg, verilog-auto-inout-module):
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index 33ae864a671..4e2b726625f 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -70,7 +70,7 @@
70;; <http://www.verilog.com/emacs_install.html> 70;; <http://www.verilog.com/emacs_install.html>
71 71
72;; The short list of installation instructions are: To set up 72;; The short list of installation instructions are: To set up
73;; automatic verilog mode, put this file in your load path, and put 73;; automatic Verilog mode, put this file in your load path, and put
74;; the following in code (please un comment it first!) in your 74;; the following in code (please un comment it first!) in your
75;; .emacs, or in your site's site-load.el 75;; .emacs, or in your site's site-load.el
76 76
@@ -116,11 +116,11 @@
116 116
117;; This variable will always hold the version number of the mode 117;; This variable will always hold the version number of the mode
118(defconst verilog-mode-version "389" 118(defconst verilog-mode-version "389"
119 "Version of this verilog mode.") 119 "Version of this Verilog mode.")
120(defconst verilog-mode-release-date "2008-02-01-GNU" 120(defconst verilog-mode-release-date "2008-02-01-GNU"
121 "Release date of this verilog mode.") 121 "Release date of this Verilog mode.")
122(defconst verilog-mode-release-emacs t 122(defconst verilog-mode-release-emacs t
123 "If non-nil, this version of verilog mode was released with Emacs itself.") 123 "If non-nil, this version of Verilog mode was released with Emacs itself.")
124 124
125(defun verilog-version () 125(defun verilog-version ()
126 "Inform caller of the version of this file." 126 "Inform caller of the version of this file."
@@ -291,20 +291,20 @@ STRING should be given if the last search was by `string-match' on STRING."
291; :group 'verilog-mode) 291; :group 'verilog-mode)
292 292
293(defgroup verilog-mode-indent nil 293(defgroup verilog-mode-indent nil
294 "Customize indentation and highlighting of verilog source text." 294 "Customize indentation and highlighting of Verilog source text."
295 :group 'verilog-mode) 295 :group 'verilog-mode)
296 296
297(defgroup verilog-mode-actions nil 297(defgroup verilog-mode-actions nil
298 "Customize actions on verilog source text." 298 "Customize actions on Verilog source text."
299 :group 'verilog-mode) 299 :group 'verilog-mode)
300 300
301(defgroup verilog-mode-auto nil 301(defgroup verilog-mode-auto nil
302 "Customize AUTO actions when expanding verilog source text." 302 "Customize AUTO actions when expanding Verilog source text."
303 :group 'verilog-mode) 303 :group 'verilog-mode)
304 304
305(defcustom verilog-linter 305(defcustom verilog-linter
306 "echo 'No verilog-linter set, see \"M-x describe-variable verilog-linter\"'" 306 "echo 'No verilog-linter set, see \"M-x describe-variable verilog-linter\"'"
307 "*Unix program and arguments to call to run a lint checker on verilog source. 307 "*Unix program and arguments to call to run a lint checker on Verilog source.
308Depending on the `verilog-set-compile-command', this may be invoked when 308Depending on the `verilog-set-compile-command', this may be invoked when
309you type \\[compile]. When the compile completes, \\[next-error] will take 309you type \\[compile]. When the compile completes, \\[next-error] will take
310you to the next lint error." 310you to the next lint error."
@@ -314,7 +314,7 @@ you to the next lint error."
314 314
315(defcustom verilog-coverage 315(defcustom verilog-coverage
316 "echo 'No verilog-coverage set, see \"M-x describe-variable verilog-coverage\"'" 316 "echo 'No verilog-coverage set, see \"M-x describe-variable verilog-coverage\"'"
317 "*Program and arguments to use to annotate for coverage verilog source. 317 "*Program and arguments to use to annotate for coverage Verilog source.
318Depending on the `verilog-set-compile-command', this may be invoked when 318Depending on the `verilog-set-compile-command', this may be invoked when
319you type \\[compile]. When the compile completes, \\[next-error] will take 319you type \\[compile]. When the compile completes, \\[next-error] will take
320you to the next lint error." 320you to the next lint error."
@@ -324,7 +324,7 @@ you to the next lint error."
324 324
325(defcustom verilog-simulator 325(defcustom verilog-simulator
326 "echo 'No verilog-simulator set, see \"M-x describe-variable verilog-simulator\"'" 326 "echo 'No verilog-simulator set, see \"M-x describe-variable verilog-simulator\"'"
327 "*Program and arguments to use to interpret verilog source. 327 "*Program and arguments to use to interpret Verilog source.
328Depending on the `verilog-set-compile-command', this may be invoked when 328Depending on the `verilog-set-compile-command', this may be invoked when
329you type \\[compile]. When the compile completes, \\[next-error] will take 329you type \\[compile]. When the compile completes, \\[next-error] will take
330you to the next lint error." 330you to the next lint error."
@@ -334,7 +334,7 @@ you to the next lint error."
334 334
335(defcustom verilog-compiler 335(defcustom verilog-compiler
336 "echo 'No verilog-compiler set, see \"M-x describe-variable verilog-compiler\"'" 336 "echo 'No verilog-compiler set, see \"M-x describe-variable verilog-compiler\"'"
337 "*Program and arguments to use to compile verilog source. 337 "*Program and arguments to use to compile Verilog source.
338Depending on the `verilog-set-compile-command', this may be invoked when 338Depending on the `verilog-set-compile-command', this may be invoked when
339you type \\[compile]. When the compile completes, \\[next-error] will take 339you type \\[compile]. When the compile completes, \\[next-error] will take
340you to the next lint error." 340you to the next lint error."
@@ -624,7 +624,7 @@ always be saved."
624 ; Leda 624 ; Leda
625 ("In file \\([^ \t]+\\)[ \t]+line[ \t]+\\([0-9]+\\):\n[^\n]*\n[^\n]*\n\\[\\(Warning\\|Error\\|Failure\\)\\][^\n]*" 1 2) 625 ("In file \\([^ \t]+\\)[ \t]+line[ \t]+\\([0-9]+\\):\n[^\n]*\n[^\n]*\n\\[\\(Warning\\|Error\\|Failure\\)\\][^\n]*" 1 2)
626 ) 626 )
627; "*List of regexps for verilog compilers, like verilint. See compilation-error-regexp-alist for the formatting." 627; "*List of regexps for Verilog compilers, like verilint. See compilation-error-regexp-alist for the formatting."
628) 628)
629 629
630(defvar verilog-error-font-lock-keywords 630(defvar verilog-error-font-lock-keywords
@@ -777,7 +777,7 @@ included."
777 "*If true, AUTOSENSE should assume all defines represent constants. 777 "*If true, AUTOSENSE should assume all defines represent constants.
778When true, the defines will not be included in sensitivity lists. To 778When true, the defines will not be included in sensitivity lists. To
779maintain compatibility with other sites, this should be set at the bottom 779maintain compatibility with other sites, this should be set at the bottom
780of each verilog file that requires it, rather than being set globally." 780of each Verilog file that requires it, rather than being set globally."
781 :group 'verilog-mode-auto 781 :group 'verilog-mode-auto
782 :type 'boolean) 782 :type 'boolean)
783(put 'verilog-auto-sense-defines-constant 'safe-local-variable 'verilog-booleanp) 783(put 'verilog-auto-sense-defines-constant 'safe-local-variable 'verilog-booleanp)
@@ -905,12 +905,12 @@ If nil, in European format (e.g. 17.09.1997). The brain-dead American
905format (e.g. 09/17/1997) is not supported.") 905format (e.g. 09/17/1997) is not supported.")
906 906
907(defvar verilog-company nil 907(defvar verilog-company nil
908 "*Default name of Company for verilog header. 908 "*Default name of Company for Verilog header.
909If set will become buffer local.") 909If set will become buffer local.")
910(make-variable-buffer-local 'verilog-company) 910(make-variable-buffer-local 'verilog-company)
911 911
912(defvar verilog-project nil 912(defvar verilog-project nil
913 "*Default name of Project for verilog header. 913 "*Default name of Project for Verilog header.
914If set will become buffer local.") 914If set will become buffer local.")
915(make-variable-buffer-local 'verilog-project) 915(make-variable-buffer-local 'verilog-project)
916 916
@@ -2368,7 +2368,7 @@ Key bindings specific to `verilog-mode-map' are:
2368 (add-hook 'font-lock-after-fontify-buffer-hook 'verilog-colorize-include-files-buffer t t) ; not in emacs 20 2368 (add-hook 'font-lock-after-fontify-buffer-hook 'verilog-colorize-include-files-buffer t t) ; not in emacs 20
2369 (add-hook 'after-change-functions 'verilog-colorize-include-files t t) 2369 (add-hook 'after-change-functions 'verilog-colorize-include-files t t)
2370 2370
2371 ;; Tell imenu how to handle verilog. 2371 ;; Tell imenu how to handle Verilog.
2372 (make-local-variable 'imenu-generic-expression) 2372 (make-local-variable 'imenu-generic-expression)
2373 (setq imenu-generic-expression verilog-imenu-generic-expression) 2373 (setq imenu-generic-expression verilog-imenu-generic-expression)
2374 ;; hideshow support 2374 ;; hideshow support
@@ -2640,7 +2640,7 @@ following code fragment:
2640 (verilog-insert-1 "%3.3d" max)) 2640 (verilog-insert-1 "%3.3d" max))
2641 2641
2642(defun verilog-mark-defun () 2642(defun verilog-mark-defun ()
2643 "Mark the current verilog function (or procedure). 2643 "Mark the current Verilog function (or procedure).
2644This puts the mark at the end, and point at the beginning." 2644This puts the mark at the end, and point at the beginning."
2645 (interactive) 2645 (interactive)
2646 (when (featurep 'xemacs) 2646 (when (featurep 'xemacs)
@@ -7114,7 +7114,7 @@ Return modi if successful, else print message unless IGNORE-ERROR is true."
7114 (set-buffer (if (bufferp (verilog-modi-file-or-buffer modi)) 7114 (set-buffer (if (bufferp (verilog-modi-file-or-buffer modi))
7115 (verilog-modi-file-or-buffer modi) 7115 (verilog-modi-file-or-buffer modi)
7116 (find-file-noselect (verilog-modi-file-or-buffer modi)))) 7116 (find-file-noselect (verilog-modi-file-or-buffer modi))))
7117 (or (equal major-mode `verilog-mode) ;; Put into verilog mode to get syntax 7117 (or (equal major-mode `verilog-mode) ;; Put into Verilog mode to get syntax
7118 (verilog-mode)) 7118 (verilog-mode))
7119 (goto-char (verilog-modi-point modi))) 7119 (goto-char (verilog-modi-point modi)))
7120 7120
@@ -9920,14 +9920,14 @@ Clicking on the middle-mouse button loads them in a buffer (as in dired)."
9920 ;; remake overlays 9920 ;; remake overlays
9921 (verilog-colorize-include-files (point-min) (point-max) nil)) 9921 (verilog-colorize-include-files (point-min) (point-max) nil))
9922 9922
9923;; ffap-at-mouse isn't useful for verilog mode. It uses library paths. 9923;; ffap-at-mouse isn't useful for Verilog mode. It uses library paths.
9924;; so define this function to do more or less the same as ffap-at-mouse 9924;; so define this function to do more or less the same as ffap-at-mouse
9925;; but first resolve filename... 9925;; but first resolve filename...
9926(defun verilog-load-file-at-mouse (event) 9926(defun verilog-load-file-at-mouse (event)
9927 "Load file under button 2 click's EVENT. 9927 "Load file under button 2 click's EVENT.
9928Files are checked based on `verilog-library-directories'." 9928Files are checked based on `verilog-library-directories'."
9929 (interactive "@e") 9929 (interactive "@e")
9930 (save-excursion ;; implement a verilog specific ffap-at-mouse 9930 (save-excursion ;; implement a Verilog specific ffap-at-mouse
9931 (mouse-set-point event) 9931 (mouse-set-point event)
9932 (beginning-of-line) 9932 (beginning-of-line)
9933 (if (looking-at verilog-include-file-regexp) 9933 (if (looking-at verilog-include-file-regexp)
@@ -9942,14 +9942,14 @@ Files are checked based on `verilog-library-directories'."
9942 "File '%s' isn't readable, use shift-mouse2 to paste in this field" 9942 "File '%s' isn't readable, use shift-mouse2 to paste in this field"
9943 (match-string 1))))))) 9943 (match-string 1)))))))
9944 9944
9945;; ffap isn't useable for verilog mode. It uses library paths. 9945;; ffap isn't useable for Verilog mode. It uses library paths.
9946;; so define this function to do more or less the same as ffap 9946;; so define this function to do more or less the same as ffap
9947;; but first resolve filename... 9947;; but first resolve filename...
9948(defun verilog-load-file-at-point () 9948(defun verilog-load-file-at-point ()
9949 "Load file under point. 9949 "Load file under point.
9950Files are checked based on `verilog-library-directories'." 9950Files are checked based on `verilog-library-directories'."
9951 (interactive) 9951 (interactive)
9952 (save-excursion ;; implement a verilog specific ffap 9952 (save-excursion ;; implement a Verilog specific ffap
9953 (beginning-of-line) 9953 (beginning-of-line)
9954 (if (looking-at verilog-include-file-regexp) 9954 (if (looking-at verilog-include-file-regexp)
9955 (if (and 9955 (if (and
@@ -10045,7 +10045,7 @@ You may also want to look at the Verilog-Mode FAQ, see
10045http://www.veripool.com/verilog-mode-faq.html. 10045http://www.veripool.com/verilog-mode-faq.html.
10046 10046
10047To reproduce the bug, start a fresh Emacs via " invocation-name " 10047To reproduce the bug, start a fresh Emacs via " invocation-name "
10048-no-init-file -no-site-file'. In a new buffer, in verilog mode, type 10048-no-init-file -no-site-file'. In a new buffer, in Verilog mode, type
10049the code included below. 10049the code included below.
10050 10050
10051Given those lines, I expected [[Fill in here]] to happen; 10051Given those lines, I expected [[Fill in here]] to happen;