Re: PCL 70 times slower than Ernie with 1000 cars.

[Nat Ballou <ballou@RACINE.ACA.MCC.COM>]

--->  Who would ever want to measure the performance of code like this????

(defun write-car-instance ( num)
  (let ((rnum (random num))
	(instance (intern (format nil "AUTO-~D" num))))
                   ------
    (setq autoinstances (cons instance autoinstances))
    (eval `(defvar ,instance (make-autos
     ----   ------     	       ':autos-ashtray-contents (case (rem ,rnum 3)
							  (0   'ashes)
							  (1  'gum)
							  (2 'money)))))))