Ignore:
Timestamp:
11/16/10 19:40:03 (12 years ago)
Author:
astalla
Message:

Added with-code-to-method to pass2 to compile the constructor and, in the future, the static initializer.

File:
1 edited

Legend:

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

    r12932 r13025  
    11401140
    11411141(defvar *current-code-attribute* nil)
     1142(defvar *method*)
    11421143
    11431144(defun save-code-specials (code)
     
    11591160         (save-code-specials *current-code-attribute*))
    11601161       (let* ((,m ,method)
     1162              (*method* ,m)
    11611163              (,c (method-ensure-code ,method))
    11621164              (*pool* (class-file-constants ,class-file))
Note: See TracChangeset for help on using the changeset viewer.