|
From: | Paul F. Dietz |
Subject: | [Gcl-devel] Two more random tester failures in cvs head |
Date: | Tue, 09 Aug 2005 23:20:51 -0500 |
User-agent: | Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.7.10) Gecko/20050716 |
I've added two more random tester-found bugs to misc.lsp. misc.613 is a failure involving throws in lambda forms in REDUCE. The enclosing catch form isn't being seen. misc.614 is a failure related to dynamic-extent. ;;; Error in APPLY [or a callee]: The tag CT1 is undefined. (deftest misc.613 (funcall (compile nil '(lambda (a) (declare (optimize (space 3) (safety 1) (debug 3) (speed 1) (compilation-speed 3))) (catch 'ct1 (reduce #'(lambda (lmv6 lmv5) (throw 'ct1 0)) (list a 0 0) :end 2)))) 1) 0) ;;; Error in MULTIPLE-VALUE-BIND [or a callee]: Cannot get relocated section contents (deftest misc.614 (funcall (compile nil '(lambda (a) (declare (type (integer -3873004182 -3717314779) a)) (declare (ignorable a)) (declare (optimize (debug 0) (safety 1) (speed 3) (space 0) (compilation-speed 0))) (let* ((v1 (make-array nil :initial-element (reduce #'logand (list a 0 a))))) (declare (dynamic-extent v1)) 0))) -3755148485) 0)
[Prev in Thread] | Current Thread | [Next in Thread] |