(defparameter a 0) (time (dotimes (x 100000) (funcall (lambda () (funcall (lambda () (incf a)))))))

(defparameter a 0) (time (dotimes (x 100000) (incf a)))