Mercurial > emacs

diff lisp/progmodes/verilog-mode.el @ 107865:8fb2953d73a1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* progmodes/verilog-mode.el (verilog-forward-sexp): Avoid free variable.
author Glenn Morris <rgm@gnu.org>
date Thu, 15 Apr 2010 10:14:10 -0700
parents d3738a1728c6
children d835100c3e8b
line wrap: on
line diff
--- a/lisp/progmodes/verilog-mode.el	Thu Apr 15 12:13:27 2010 +0200
+++ b/lisp/progmodes/verilog-mode.el	Thu Apr 15 10:14:10 2010 -0700
@@ -2611,7 +2611,7 @@
 	    (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 @@
 	       (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 @@
 		       ((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