Function: WALK-SPECIALIZED-ARGUMENT-FORM

Source

(defun walk-specialized-argument-form (form parent env)
  (declare (ignore env))
  (make-instance 'specialized-function-argument-form
                 :name (if (listp form)
                           (first form)
                           form) 
                 :specializer (if (listp form)
                                  (second form)
                                  'T)
                 :parent parent
                 :source form))