(defun bug061 (a c) (let ((v5 (* (setq a (min 10 (max 0 c))) 0))) (let ((v7 (- a))) (format t "~a and ~a are " v5 v7) (if (= v5 v7) (format t "equal~%") (format t "not equal~%")))))
(bug061 1 -1) --> 0 and 0 are not equal
Bug watches keep track of this bug in other bug trackers.