:INITFORM Slot Option
Specifies default initial value
(defclass rectangle (square)
((height :initform 0 :initarg :height
:accessor height)))
> (setq another (make-instance ‘rectangle :x 6 :y 6))
#<RECTANGLE 34a7>
> (height another)
0
Previous slide
Next slide
Back to first slide
View graphic version