id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc
877	sticky default-initargs	brooks		"Redefining a class does not work properly when the first def contains :default-initargs, but the second def does not.
What happens is that use of the second def still has the default initiarg.

__________
{{{
? (defclass foo () ((x :accessor x :initarg :x)) (:default-initargs :x 2))

? (describe (make-instance 'foo))

#<FOO #x302093A3C44D>
Class: #<STANDARD-CLASS FOO>
Wrapper: #<CCL::CLASS-WRAPPER FOO #x302093A3E25D>
Instance slots
X: 2

? (defclass foo () ((x :accessor x :initarg :x)))

? (describe (make-instance 'foo))

#<FOO #x302093A3C44D>
Class: #<STANDARD-CLASS FOO>
Wrapper: #<CCL::CLASS-WRAPPER FOO #x302093A3E25D>
Instance slots
X: 2
}}}

"	defect	closed	normal		Compiler	1.6	invalid