Mercurial > emacs

changeset 50573:e80e4ccf1bfc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(byte-compile-file-form-defvar, byte-compile-defvar): Fix last commit which mistakenly relied on not-yet committed code.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sat, 12 Apr 2003 21:39:50 +0000
parents c62614cbc500
children b67822aa50a8
files lisp/emacs-lisp/bytecomp.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el	Sat Apr 12 20:43:58 2003 +0000
+++ b/lisp/emacs-lisp/bytecomp.el	Sat Apr 12 21:39:50 2003 +0000
@@ -10,7 +10,7 @@
 
 ;;; This version incorporates changes up to version 2.10 of the
 ;;; Zawinski-Furuseth compiler.
-(defconst byte-compile-version "$Revision: 2.122 $")
+(defconst byte-compile-version "$Revision: 2.123 $")
 
 ;; This file is part of GNU Emacs.
 
@@ -2065,7 +2065,7 @@
       ;; and not do a file-boundary.
       (byte-compile-keep-pending form)
     (when (memq 'free-vars byte-compile-warnings)
-      (push (nth 1 form) byte-compile-dynamic-variables)
+      (push (nth 1 form) byte-compile-bound-variables)
       (if (eq (car form) 'defconst)
 	  (push (nth 1 form) byte-compile-const-variables)))
     (cond ((consp (nth 2 form))
@@ -3561,7 +3561,7 @@
        "%s called with %d arguments, but accepts only %s"
        fun (length (cdr form)) "2-3"))
     (when (memq 'free-vars byte-compile-warnings)
-      (push var byte-compile-dynamic-variables)
+      (push var byte-compile-bound-variables)
       (if (eq fun 'defconst)
 	  (push var byte-compile-const-variables)))
     (byte-compile-body-do-effect