Suggested indentation for DEFCLASS

(defclass bla ()
  ((slot-name1
     :initarg :initarg1
     :initform
       (multiple-value-bind (a b) (f x)
         (list a b))
     :reader reader1)
   (slot-name2
     :initarg :initarg2
     :initform nil
     :accessor accessor2)))