Changeset 11848


Ignore:
Timestamp:
05/09/09 18:01:56 (14 years ago)
Author:
ehuelsmann
Message:

Eliminate style warnings for variables LOCALLY DECLAREd SPECIAL,
by letting the compiler know about the declaration.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/compile-file.lisp

    r11845 r11848  
    240240                 (parse-body (cdr form) nil)
    241241               (process-optimization-declarations decls)
    242                (process-toplevel-progn forms stream compile-time-too)
     242               (let* ((jvm::*visible-variables* jvm::*visible-variables*)
     243                      (specials (process-special-declarations decls)))
     244                 (dolist (special specials)
     245                   (push (jvm::make-variable :name special :special-p t)
     246                         jvm::*visible-variables*))
     247                 (process-toplevel-progn forms stream compile-time-too))
    243248               (return-from process-toplevel-form))))
    244249          (PROGN
Note: See TracChangeset for help on using the changeset viewer.