Comment 1 for bug 1779737

Revision history for this message
Paul F. Dietz (paul-f-dietz) wrote :

Simplified:

(defun f139 (x)
  (list (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        (list nil)
        x x x x x x x x
        (setf (car x) 0)
        (setf (cdr x) 0)))