Changeset 11306


Ignore:
Timestamp:
09/07/08 13:18:56 (14 years ago)
Author:
ehuelsmann
Message:

Revert c11291 which breaks certain uses of ASDF.

Found by: Mark Evenson (evenson at panix.com)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/clos.lisp

    r11297 r11306  
    19511951;; methods, along with the predefined initialization argument :ALLOW-OTHER-KEYS."
    19521952;; 7.1.2
     1953#+nil
    19531954(defun check-initargs (class initargs)
    19541955  (when (oddp (length initargs))
     
    19661967                 :format-arguments (list initarg)))))))
    19671968
    1968 ;; FIXME: 20080830 ehuelsmann - The above method used to be commented out
    1969 ;; I switched the situation around, based upon my reading of the spec, the
    1970 ;; version above is not strict enough, but correct when it generates an error
    1971 ;; In other words: it allows unsupported arguments when ':allow-other-keys T'
    1972 #+nil
     1969;; FIXME
    19731970(defun check-initargs (class initargs)
    19741971  (declare (ignore class initargs)))
Note: See TracChangeset for help on using the changeset viewer.