Saludos

estoy empezando a programar en LISP, y queria crear un codigo sencillo que tiene una funcion que se llama burbuja y que dentro tiene declarado un arreglo de 2 elementos y les va asignando valores a cada uno con setf, pero lo que me imprime es el nombre de la funcion!! o sea BURBUJA, y no los valores del arreglo, cómo puedo arreglar esto???????

(defun burbuja()
    ((let (array (make-array '(2))))
       (setf (aref array 0) 7)
       (setf (aref array 1) 2)))
 

gracias