- ((title :type string :initarg :title :reader title :initform nil)
- (street :type string :initarg :street :reader street :initform nil)
- (phones :initarg :phones :reader phones :initform nil :subobject t))
+ ((title :type string :initarg :title :reader title)
+ (street :type string :initarg :street :reader street)
+ (phones :initarg :phones :reader phones :subobject t))