procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* progmodes/verilog-mode.el (verilog-forward-sexp): Avoid free variable.

Browse source
This commit is contained in:
Glenn Morris 2010-04-15 10:14:10 -07:00
parent ed21c5c84c
commit 82883f0a8e
2 changed files with 8 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2010-04-15 Glenn Morris <rgm@gnu.org>
* progmodes/verilog-mode.el (verilog-forward-sexp): Avoid free variable.
2010-04-15 Juanma Barranquero <lekktu@gmail.com>
Simplify by using `define-derived-mode'.

7
lisp/progmodes/verilog-mode.el
View file

@ -2611,7 +2611,7 @@ Use filename, if current buffer being edited shorten to just buffer name."
(if (or
(looking-at verilog-disable-fork-re)
(and (looking-at "fork")
(progn
(progn
(setq here (point)) ;; sometimes a fork is just a fork
(forward-word -1)
(looking-at verilog-disable-fork-re))))
@ -2670,7 +2670,8 @@ Use filename, if current buffer being edited shorten to just buffer name."
(forward-word 1))
(catch 'skip
(if (eq nest 'yes)
(let ((depth 1))
(let ((depth 1)
here)
(while (verilog-re-search-forward reg nil 'move)
(cond
((match-end md) ; a closer in regular expression, so we are climbing out
@ -2686,7 +2687,7 @@ Use filename, if current buffer being edited shorten to just buffer name."
((if (or
(looking-at verilog-disable-fork-re)
(and (looking-at "fork")
(progn
(progn
(forward-word -1)
(looking-at verilog-disable-fork-re))))
(progn ;; it is a disable fork; another false alarm