|
9 | 9 | ;; Keywords: languages |
10 | 10 | ;; The "Version" is the date followed by the decimal rendition of the Git |
11 | 11 | ;; commit hex. |
12 | | -;; Version: 2019.11.21.248091482 |
| 12 | +;; Version: 2019.12.17.268053413 |
13 | 13 |
|
14 | 14 | ;; Yoni Rabkin <yoni@rabkins.net> contacted the maintainer of this |
15 | 15 | ;; file on 19/3/2008, and the maintainer agreed that when a bug is |
|
124 | 124 | ;; |
125 | 125 |
|
126 | 126 | ;; This variable will always hold the version number of the mode |
127 | | -(defconst verilog-mode-version "2019-11-21-ec9935a-vpo-GNU" |
| 127 | +(defconst verilog-mode-version "2019-12-17-ffa2ba5-vpo-GNU" |
128 | 128 | "Version of this Verilog mode.") |
129 | 129 | (defconst verilog-mode-release-emacs t |
130 | 130 | "If non-nil, this version of Verilog mode was released with Emacs itself.") |
@@ -2077,7 +2077,7 @@ find the errors." |
2077 | 2077 | "`resetall" "`timescale" "`unconnected_drive" "`undef" "`undefineall" |
2078 | 2078 | ;; compiler directives not covered by IEEE 1800 |
2079 | 2079 | "`case" "`default" "`endfor" "`endprotect" "`endswitch" "`endwhile" "`for" |
2080 | | - "`format" "`if" "`let" "`protect" "`switch" "`time_scale" |
| 2080 | + "`format" "`if" "`let" "`protect" "`switch" "`time_scale" "`uselib" |
2081 | 2081 | "`while" |
2082 | 2082 | )) |
2083 | 2083 | "List of Verilog compiler directives.") |
@@ -8491,6 +8491,9 @@ Return an array of [outputs inouts inputs wire reg assign const]." |
8491 | 8491 | ((looking-at "^\\s *`pragma\\s +protect\\s +begin_protected") |
8492 | 8492 | (or (re-search-forward "^\\s *`pragma\\s +protect\\s +end_protected" nil t) |
8493 | 8493 | (forward-line))) |
| 8494 | + ((looking-at "^\\s *`protected\\>") |
| 8495 | + (or (re-search-forward "^\\s *`endprotected\\>" nil t) |
| 8496 | + (forward-line))) |
8494 | 8497 | ((looking-at "(\\*") |
8495 | 8498 | ;; To advance past either "(*)" or "(* ... *)" don't forward past first * |
8496 | 8499 | (forward-char 1) |
@@ -9363,6 +9366,8 @@ Returns REGEXP and list of ( (signal_name connection_name)... )." |
9363 | 9366 | (setq tpl-regexp (match-string-no-properties 1)) |
9364 | 9367 | (goto-char (match-end 0))) |
9365 | 9368 | (search-forward "(") |
| 9369 | + (while (verilog-within-string) ;; e.g. inside a tpl-regexp spec |
| 9370 | + (search-forward "(")) |
9366 | 9371 | ;; Parse lines in the template |
9367 | 9372 | (when (or verilog-auto-inst-template-numbers |
9368 | 9373 | verilog-auto-template-warn-unused) |
@@ -14565,7 +14570,7 @@ Files are checked based on `verilog-library-flags'." |
14565 | 14570 | (interactive) |
14566 | 14571 | (let ((reporter-prompt-for-summary-p t)) |
14567 | 14572 | (reporter-submit-bug-report |
14568 | | - "mac@verilog.com, wsnyder@wsnyder.org" |
| 14573 | + "wsnyder@wsnyder.org" |
14569 | 14574 | (concat "verilog-mode v" verilog-mode-version) |
14570 | 14575 | '( |
14571 | 14576 | verilog-active-low-regexp |
@@ -14645,7 +14650,7 @@ Files are checked based on `verilog-library-flags'." |
14645 | 14650 | verilog-warn-fatal |
14646 | 14651 | ) |
14647 | 14652 | nil nil |
14648 | | - (concat "Hi Mac, |
| 14653 | + (concat "Hi, |
14649 | 14654 |
|
14650 | 14655 | I want to report a bug. |
14651 | 14656 |
|
|
0 commit comments