; Loading system definition from
; /home/jjgarcia/tmp/intel64/lib/ecl-11.1.1/rt.asd into #<ASDF0 package>
;;; Loading "/home/jjgarcia/tmp/intel64/lib/ecl-11.1.1/rt.asd"
; Registering #<prebuilt-system "rt"> as rt
;;; Loading "/home/jjgarcia/tmp/intel64/lib/ecl-11.1.1/rt.fas"
;;;
;;; Compiling /home/jjgarcia/tmp/intel64/lisp/quicklisp/disECL-BUILD-OKECL-TEST-OKterate-20101006-darcs/iterate-test.lisp.
;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3, Debug=0
;;;
;;; Compiling (DEFUN SETUP-HASH-TABLE ...).
;;; Compiling (DEFPARAMETER *AN-ALIST* ...).
;;; Compiling (DEFPARAMETER *LIST-OF-LISTS* ...).
;;; Compiling (DEFUN LONGEST-LIST ...).
;;; Compiling (DEFMACRO SUM-OF-SQUARES ...).
;;; Compiling (DEFMACRO-CLAUSE (FOR VAR ...) ...).
;;; Compiling (DEFMACRO-DRIVER (FOR VAR ...) ...).
;;; Compiling (DEFCLASS POLAR ...).
;;; Compiling (DEFMACRO PROBLEM-BECAUSE-I-RETURN-NIL ...).
;;; Warning:
;;;   in file iterate-test.lisp, position 47152
;;;   at (FSET 'PROBLEM-BECAUSE-I-RETURN-NIL ...)
;;;   ! The variable #:G65 is not used.
;;; End of Pass 1.
;;; Note:
;;;   Refusing to propagate #<form RPLACD 30eff00>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 30fc450>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 3114c30>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 3114180>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 3123810>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 3123000>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 31314b0>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 313fc00>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 313f1e0>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 31559f0>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 31552d0>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 3155240>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 31551b0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 3155120>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 3155090>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 3165cc0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 3165b40>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 3165870>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 31656c0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 31654e0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 31652a0>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 3165120>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 3175e40>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 3175cc0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 31756f0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 3175420>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 3175270>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 294e9f0>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 294e7e0>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 294e510>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 294e360>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2957f60>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2957a80>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2957870>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 29575a0>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2957330>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2962f90>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2962d80>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2962b40>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 29629c0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 29628d0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 2962810>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2962780>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 2962600>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 2962570>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 29624e0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 2962450>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 29623c0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 2962330>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 29622a0>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2962210>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 2962150>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 2962030>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 296aea0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 296ae10>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 296ad80>
;;; Note:
;;;   Refusing to propagate #<form MAKE-FORM 296acf0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 296ab70>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 296aae0>
;;; Note:
;;;   Refusing to propagate #<form INIT-FORM 296aa50>
;;; Emitting code for SETUP-HASH-TABLE.
;;; Emitting code for LONGEST-LIST.
;;; Emitting code for SUM-OF-SQUARES.
;;; Emitting code for CLAUSE-FOR-IN-WHOLE-VECTOR.CLAUSE-2.
;;; Emitting code for CLAUSE-FOR-IN-WHOLE-VECTOR-5.
;;; Emitting code for PROBLEM-BECAUSE-I-RETURN-NIL.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/home/jjgarcia/tmp/intel64/include/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -Dlinux -O2 -w -c /home/jjgarcia/tmp/intel64/.cache/common-lisp/ecl-11.1.1-ce19c67a-linux-amd64/home/jjgarcia/tmp/intel64/lisp/quicklisp/dists/quicklisp/software/iterate-20101006-darcs/ASDF-TMP-iterate-test.c -o /home/jjgarcia/tmp/intel64/.cache/common-lisp/ecl-11.1.1-ce19c67a-linux-amd64/home/jjgarcia/tmp/intel64/lisp/quicklisp/dists/quicklisp/software/iterate-20101006-darcs/ASDF-TMP-iterate-test.o 
;;; Finished compiling /home/jjgarcia/tmp/intel64/lisp/quicklisp/dists/quicklisp/software/iterate-20101006-darcs/iterate-test.lisp.
;;;
;;; Warning: COMPILE-FILE warned while performing
             #<compile-op NIL 00000000024d2b70> on
             #<cl-source-file "iterate-tests" "iterate-test">.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/home/jjgarcia/tmp/intel64/include/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -Dlinux -O2 -w -c /home/jjgarcia/tmp/intel64/tmp/eclinitaSk7KC.c -o /home/jjgarcia/tmp/intel64/tmp/eclinitaSk7KC.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o /home/jjgarcia/tmp/intel64/.cache/common-lisp/ecl-11.1.1-ce19c67a-linux-amd64/home/jjgarcia/tmp/intel64/lisp/quicklisp/dists/quicklisp/software/iterate-20101006-darcs/iterate-test.fas -L/home/jjgarcia/tmp/intel64/lib/ /home/jjgarcia/tmp/intel64/tmp/eclinitaSk7KC.o /home/jjgarcia/tmp/intel64/.cache/common-lisp/ecl-11.1.1-ce19c67a-linux-amd64/home/jjgarcia/tmp/intel64/lisp/quicklisp/dists/quicklisp/software/iterate-20101006-darcs/iterate-test.o -Wl,--rpath,/home/jjgarcia/tmp/intel64/lib/ -shared -lecl -lgmp -lgc -ldl -lm 
;;; Loading "/home/jjgarcia/tmp/intel64/.cache/common-lisp/ecl-11.1.1-ce19c67a-linux-amd64/home/jjgarcia/tmp/intel64/lisp/quicklisp/dists/quicklisp/software/iterate-20101006-darcs/iterate-test.fas"
Doing 261 pending tests of 261 tests total.
 ITERATE.TEST::DSETQ.1 ITERATE.TEST::DSETQ.2 ITERATE.TEST::DSETQ.3
 ITERATE.TEST::DSETQ.DESTRUCTURING.1 ITERATE.TEST::DSETQ.DESTRUCTURING.2
 ITERATE.TEST::DSETQ.VALUES.1 ITERATE.TEST::DSETQ.VALUES.2
 ITERATE.TEST::DSETQ.VALUES.3 ITERATE.TEST::DSETQ.VALUES.4
 ITERATE.TEST::REPEAT.1 ITERATE.TEST::REPEAT.2 ITERATE.TEST::REPEAT.3
 ITERATE.TEST::LOCALLY.1 ITERATE.TEST::LOCALLY.2 ITERATE.TEST::ALWAYS.1
 ITERATE.TEST::ALWAYS.2 ITERATE.TEST::ALWAYS.3
 ITERATE.TEST::ALWAYS.NEVER.1 ITERATE.TEST::ALWAYS.NEVER.2"hi"
 ITERATE.TEST::THEREIS.FINALLY.1 ITERATE.TEST::THEREIS.FINALLY.2
 ITERATE.TEST::THEREIS.FINALLY.3"hi"
 ITERATE.TEST::THEREIS.FINALLY-PROTECTED.1
 ITERATE.TEST::THEREIS.FINALLY-PROTECTED.2
 ITERATE.TEST::FINDING.SUCH-THAT.2
 ITERATE.TEST::FINDING.SUCH-THAT.NEST.1
 ITERATE.TEST::FINDING.SUCH-THAT.NEST.2 ITERATE.TEST::FINDING.THEREIS.1
 ITERATE.TEST::FINDING.THEREIS.2 ITERATE.TEST::FINDING.THEREIS.3
 ITERATE.TEST::FINDING.ALWAYS.1 ITERATE.TEST::FINDING.ALWAYS.2
 ITERATE.TEST::FINDING.ALWAYS.3 ITERATE.TEST::IN-HASHTABLE.KEYS
 ITERATE.TEST::IN-HASHTABLE.ITEMS.1 ITERATE.TEST::IN-HASHTABLE.ITEMS.2
 ITERATE.TEST::IN-HASHTABLE.1 ITERATE.TEST::IN-HASHTABLE.DESTRUCTURING.1
 ITERATE.TEST::IN-PACKAGE.INTERNALS ITERATE.TEST::IN-PACKAGE.EXTERNALS.1
 ITERATE.TEST::IN-PACKAGE.EXTERNALS.2 ITERATE.TEST::IN-PACKAGE.GENERATOR
 ITERATE.TEST::IN-PACKAGES.EXTERNAL
 ITERATE.TEST::IN-PACKAGES.GENERATOR-ACCESS ITERATE.TEST::IN-STREAM.1
 ITERATE.TEST::IN-STREAM.PREVIOUS ITERATE.TEST::IN-STREAM.2
 ITERATE.TEST::IN-STREAM.3 ITERATE.TEST::IN-STREAM.REDUCING
 ITERATE.TEST::IN-STREAM.ACCUMULATING ITERATE.TEST::IN-STREAM.GENERATE
 ITERATE.TEST::REDUCING.0 ITERATE.TEST::UNTIL.1 ITERATE.TEST::UNTIL.2
 ITERATE.TEST::WHILE.1 ITERATE.TEST::ELSE.1 ITERATE.TEST::ELSE.2
 ITERATE.TEST::COLLECT.1 ITERATE.TEST::GENERATE.1
 ITERATE.TEST::FIND-LONGEST-LIST.1 ITERATE.TEST::FIND-LONGEST-LIST.2
 ITERATE.TEST::FIND-LONGEST-LIST.3 ITERATE.TEST::FIND-LONGEST-LIST.4
 ITERATE.TEST::MAXIMIZE.1 ITERATE.TEST::MAXIMIZE.2
 ITERATE.TEST::FINDING.MINIMIZING.1 ITERATE.TEST::MINIMIZE.1
 ITERATE.TEST::MINIMIZE.2 ITERATE.TEST::SUBBLOCKS.MAXIMIZE.1
 ITERATE.TEST::SUBBLOCKS.MINIMIZE.1 ITERATE.TEST::MAXIMIZE.3
 ITERATE.TEST::MINIMIZE.3 ITERATE.TEST::MAXIMIZE.MULTIPLE
 ITERATE.TEST::MINIMIZE.MULTIPLE ITERATE.TEST::ACCUMULATE.1
 ITERATE.TEST::ACCUMULATE.2 ITERATE.TEST::ACCUMULATE.3
 ITERATE.TEST::ACCUMULATE.4 ITERATE.TEST::ACCUMULATE.5
 ITERATE.TEST::ACCUMULATE.6 ITERATE.TEST::IN-STRING.DOWNTO.1
 ITERATE.TEST::IN-SEQUENCE.DOWNTO.1 ITERATE.TEST::REDUCING.1
 ITERATE.TEST::REDUCING.2 ITERATE.TEST::REDUCING.3
 ITERATE.TEST::REDUCING.4 ITERATE.TEST::REDUCING.5
 ITERATE.TEST::REDUCING.6 ITERATE.TEST::GENERATE.DESTRUCTURING.1
 ITERATE.TEST::GENERATING.DESTRUCTURING.1
 ITERATE.TEST::FOR.GENERATE-T.DESTRUCTURING.1
 ITERATE.TEST::GENERATE.NEXT.1 ITERATE.TEST::GENERATE.PREVIOUS.1
 ITERATE.TEST::GENERATE.NEXT.2 ITERATE.TEST::IF.1 ITERATE.TEST::IF.2
 ITERATE.TEST::OR.1 ITERATE.TEST::OR.2 ITERATE.TEST::SETF.1
 ITERATE.TEST::SETF.2 ITERATE.TEST::SETF.3 ITERATE.TEST::SETF.4
 ITERATE.TEST::AFTER-EACH.1 ITERATE.TEST::AFTER-EACH.2
 ITERATE.TEST::AFTER-EACH.3 ITERATE.TEST::NEXT-ITERATION.1
 ITERATE.TEST::NEXT-ITERATION.2 ITERATE.TEST::COLLECT.2
 ITERATE.TEST::FOR-IN.2 ITERATE.TEST::FOR.DESTRUCTURING.1
 ITERATE.TEST::REPEAT.0 ITERATE.TEST::FOR.NEXT.1
Test ITERATE.TEST::FOR.DO-NEXT.1 failed
Form: (ITERATE:ITERATE (ITERATE:INITIALLY (SETQ ITERATE.TEST::I 0))
                       (ITERATE:AS ITERATE.TEST::I ITERATE.TEST::DO-NEXT
                        (IF (> ITERATE.TEST::I 10)
                            (ITERATE:TERMINATE)
                            (INCF ITERATE.TEST::I)))
                       (ITERATE:FINALLY (RETURN ITERATE.TEST::I)))
Expected value: 11
Actual value: #<a UNDEFINED-FUNCTION>.
Condition: The function ITERATE::LIST-OF-FORMS? is undefined.
Test ITERATE.TEST::FOR.DO-NEXT.2 failed
Form: (ITERATE:ITERATE
       (ITERATE:FOR ITERATE.TEST::I ITERATE.TEST::DO-NEXT
        (IF (> ITERATE.TEST::I 7) (ITERATE:TERMINATE) (INCF ITERATE.TEST::I)))
       (DECLARE (TYPE FIXNUM ITERATE.TEST::I))
       (ITERATE:FINALLY (RETURN ITERATE.TEST::I)))
Expected value: 8
Actual value: #<a UNDEFINED-FUNCTION>.
Condition: The function ITERATE::LIST-OF-FORMS? is undefined.
Test ITERATE.TEST::FOR.DO-NEXT.3 failed
Form: (ITERATE:ITER
       (ITERATE:FOR ITERATE.TEST::A ITERATE.TEST::FROM 1 ITERATE.TEST::TO 3)
       (ITERATE:FOR ITERATE.TEST::B = (1+ (* ITERATE.TEST::A ITERATE.TEST::A)))
       (ITERATE:FOR (VALUES ITERATE.TEST::X ITERATE.TEST::Y)
        ITERATE.TEST::DO-NEXT
        (ITERATE:DSETQ (VALUES ITERATE.TEST::X ITERATE.TEST::Y)
                       (FLOOR ITERATE.TEST::B ITERATE.TEST::A)))
       (ITERATE:COLLECT ITERATE.TEST::X)
       (ITERATE:COLLECT ITERATE.TEST::Y))
Expected value: (2 0 2 1 3 1)
Actual value: #<a UNDEFINED-FUNCTION>.
Condition: The function ITERATE::LIST-OF-FORMS? is undefined.
 ITERATE.TEST::FOR.NEXT.WALK
Test ITERATE.TEST::FOR.DO-NEXT.WALK failed
Form: (ITERATE:ITER (ITERATE:REPEAT 2)
                    (ITERATE:FOR ITERATE.TEST::X ITERATE.TEST::DO-NEXT
                     (PROGN
                      (ITERATE:AFTER-EACH (ITERATE:COLLECT 1))
                      (ITERATE:DSETQ ITERATE.TEST::X 2)))
                    (ITERATE:COLLECT ITERATE.TEST::X))
Expected value: (2 1 2 1)
Actual value: #<a UNDEFINED-FUNCTION>.
Condition: The function ITERATE::LIST-OF-FORMS? is undefined.
 ITERATE.TEST::FOR.NEXT.PREVIOUS
Test ITERATE.TEST::FOR.DO-NEXT.PREVIOUS failed
Form: (ITERATE:ITER
       (ITERATE:FOR ITERATE.TEST::I ITERATE.TEST::FROM 2 ITERATE.TEST::TO 4)
       (ITERATE:FOR ITERATE.TEST::X ITERATE.TEST::DO-NEXT
        (PROGN
         (SETQ ITERATE.TEST::X (- ITERATE.TEST::I))
         (ITERATE:AFTER-EACH (ITERATE:COLLECT ITERATE.TEST::I))))
       (ITERATE:FOR ITERATE.TEST::Z ITERATE.TEST::PREVIOUS ITERATE.TEST::X
        ITERATE:INITIALLY 0)
       (ITERATE:APPENDING (LIST ITERATE.TEST::Z ITERATE.TEST::X)))
Expected value: (0 -2 2 -2 -3 3 -3 -4 4)
Actual value: #<a UNDEFINED-FUNCTION>.
Condition: The function ITERATE::LIST-OF-FORMS? is undefined.
 ITERATE.TEST::FOR-NONGENERATOR.1 ITERATE.TEST::FOR.PREVIOUS.IN
 ITERATE.TEST::FOR.PREVIOUS.TYPE.1
 ITERATE.TEST::FOR.PREVIOUS.INDEX-OF-STRING.1
 ITERATE.TEST::FOR.PREVIOUS.IN-STRING.WITH-INDEX
 ITERATE.TEST::FOR.PREVIOUS.INDEX-OF-VECTOR
 ITERATE.TEST::FOR.PREVIOUS.IN-VECTOR.WITH-INDEX
 ITERATE.TEST::FOR.FIRST.1 ITERATE.TEST::FOR.INITIALLY.1
 ITERATE.TEST::SUM.1 ITERATE.TEST::COLLECT.3 ITERATE.TEST::COLLECT.4
 ITERATE.TEST::COLLECT.5 ITERATE.TEST::COLLECT.6
 ITERATE.TEST::COLLECT-BY.1 ITERATE.TEST::IN-VECTOR.BY.1
 ITERATE.TEST::INDEX-OF-VECTOR.BY.1 ITERATE.TEST::IN-VECTOR.DOWNTO.1
 ITERATE.TEST::INDEX-OF-VECTOR.DOWNTO.1 ITERATE.TEST::IN-VECTOR.DOWNTO.2
 ITERATE.TEST::INDEX-OF-VECTOR.DOWNTO.2
 ITERATE.TEST::GENERATE.IN-VECTOR.DOWNTO.1
 ITERATE.TEST::GENERATE.INDEX-OF-VECTOR.DOWNTO.1
 ITERATE.TEST::IF-FIRST-TIME.1 ITERATE.TEST::IF-FIRST-TIME.2
 ITERATE.TEST::IF-FIRST-TIME.3 ITERATE.TEST::FIRST-TIME-P.0
 ITERATE.TEST::FIRST-TIME-P.1 ITERATE.TEST::FIRST-ITERATION-P.1
 ITERATE.TEST::COLLECT.MULTIPLE.1 ITERATE.TEST::COLLECT.TYPE.STRING.1
 ITERATE.TEST::COLLECT.TYPE.STRING.2 ITERATE.TEST::COLLECT.TYPE.STRING.3
 ITERATE.TEST::COLLECT.TYPE.VECTOR.1 ITERATE.TEST::COLLECT.TYPE.VECTOR.2
 ITERATE.TEST::ADJOIN.1 ITERATE.TEST::ADJOIN.2 ITERATE.TEST::ADJOIN.3
 ITERATE.TEST::ADJOIN.4 ITERATE.TEST::ADJOIN.5 ITERATE.TEST::ADJOIN.6
 ITERATE.TEST::APPEND.1 ITERATE.TEST::NCONC.1 ITERATE.TEST::APPEND.2
 ITERATE.TEST::NCONC.2 ITERATE.TEST::APPEND.3 ITERATE.TEST::NCONC.3
 ITERATE.TEST::APPEND.4 ITERATE.TEST::NCONC.4 ITERATE.TEST::APPEND.5
 ITERATE.TEST::APPEND.6 ITERATE.TEST::NCONC.5 ITERATE.TEST::UNION.1
 ITERATE.TEST::UNION.2 ITERATE.TEST::UNION.3 ITERATE.TEST::NUNION.3
 ITERATE.TEST::VALUE.MINIMIZE ITERATE.TEST::VALUE.MAXIMIZE
 ITERATE.TEST::VALUE.FINDING-MAXIMIZING.1
 ITERATE.TEST::VALUE.FINDING-MAXIMIZING.2 ITERATE.TEST::WALK.COUNTING
 ITERATE.TEST::VALUE.COUNTING ITERATE.TEST::VALUE.ADJOINING
 ITERATE.TEST::VALUE.COLLECTING ITERATE.TEST::VALUE.ACCUMULATE
 ITERATE.TEST::VALUE.ALWAYS ITERATE.TEST::DOTTED.1
 ITERATE.TEST::DOTTED.2 ITERATE.TEST::DOTTED.3 ITERATE.TEST::DOTTED.4
 ITERATE.TEST::DOTTED.5 ITERATE.TEST::WALK.MULTIPLE-VALUE-BIND
 ITERATE.TEST::SUBBLOCKS.1 ITERATE.TEST::SUBBLOCKS.WRONG.1
 ITERATE.TEST::SUBBLOCKS.2 ITERATE.TEST::DESTRUCTURING.1 ITERATE:LEAVE
 LAMBDA ITERATE.TEST::TYPE.1 ITERATE.TEST::TYPE.2 ITERATE.TEST::TYPE.3
 ITERATE.TEST::TYPE.4 ITERATE.TEST::TYPE.5 ITERATE.TEST::TYPE.6
 ITERATE.TEST::TYPE.7 ITERATE.TEST::STATIC.ERROR.1
 ITERATE.TEST::CODE-MOVEMENT.1 ITERATE.TEST::CODE-MOVEMENT.2
 ITERATE.TEST::CODE-MOVEMENT.3
Test ITERATE.TEST::CODE-MOVEMENT.ELSE failed
Form: (HANDLER-CASE
       (MACROEXPAND
        '(ITERATE:ITER
          (ITERATE:FOR ITERATE.TEST::I ITERATE.TEST::FROM 1 ITERATE.TEST::TO
           10)
          (LET ((ITERATE.TEST::X 3))
            (ITERATE:ELSE (RETURN ITERATE.TEST::X)))))
       (ERROR NIL T)
       (:NO-ERROR (ITERATE.TEST::F ITERATE.TEST::X)
        (DECLARE (IGNORE ITERATE.TEST::F ITERATE.TEST::X)) NIL))
Expected value: T
Actual value: NIL.
 ITERATE.TEST::CODE-MOVEMENT.AFTER-EACH
 ITERATE.TEST::CODE-MOVEMENT.DECLARE.1
 ITERATE.TEST::CODE-MOVEMENT.DECLARE.2
 ITERATE.TEST::CODE-MOVEMENT.LOCALLY.1
 ITERATE.TEST::CODE-MOVEMENT.LOCALLY.2
 ITERATE.TEST::CODE-MOVEMENT.INITIALLY
Test ITERATE.TEST::CODE-MOVEMENT.FINALLY failed
Form: (HANDLER-CASE
       (MACROEXPAND
        '(ITERATE:ITER
          (ITERATE:FOR ITERATE.TEST::I ITERATE.TEST::FROM 1 ITERATE.TEST::TO
           10)
          (LET ((ITERATE.TEST::Y ITERATE.TEST::I))
            (ITERATE:FINALLY (RETURN ITERATE.TEST::Y)))))
       (ERROR NIL T)
       (:NO-ERROR (ITERATE.TEST::F ITERATE.TEST::X)
        (DECLARE (IGNORE ITERATE.TEST::F ITERATE.TEST::X)) NIL))
Expected value: T
Actual value: NIL.
Test ITERATE.TEST::CODE-MOVEMENT.FINALLY-PROTECTED failed
Form: (HANDLER-CASE
       (MACROEXPAND
        '(ITERATE:ITER
          (ITERATE:FOR ITERATE.TEST::I ITERATE.TEST::FROM 1 ITERATE.TEST::TO
           10)
          (LET ((ITERATE.TEST::Y ITERATE.TEST::I))
            (ITERATE:FINALLY-PROTECTED (RETURN ITERATE.TEST::Y)))))
       (ERROR NIL T)
       (:NO-ERROR (ITERATE.TEST::F ITERATE.TEST::X)
        (DECLARE (IGNORE ITERATE.TEST::F ITERATE.TEST::X)) NIL))
Expected value: T
Actual value: NIL.
 ITERATE.TEST::STATIC.CONFLICT.1 ITERATE.TEST::MACRO.SHADOW.CLAUSE
 ITERATE.TEST::MULTIPLY.1 ITERATE.TEST::SUM-OF-SQUARES.1
 ITERATE.TEST::DEFMACRO-CLAUSE.1 ITERATE.TEST::MULTIPLY.CLAUSE
 ITERATE.TEST::REMOVE-CLAUSE.1 ITERATE.TEST::REMOVE-CLAUSE.2
 ITERATE.TEST::IN-WHOLE-VECTOR.CLAUSE
 ITERATE.TEST::IN-VECTOR.FILL-POINTER
 ITERATE.TEST::IN-WHOLE-VECTOR.DRIVER
 ITERATE.TEST::IN-WHOLE-VECTOR.GENERATE ITERATE:DEFCLAUSE-SEQUENCE
 ITERATE.TEST::IN-WHOLE-VECTOR.SEQ
 ITERATE.TEST::IN-WHOLE-VECTOR.SEQ.INDEX
 ITERATE.TEST::IN-WHOLE-VECTOR.SEQ.WITH-INDEX
 ITERATE.TEST::IN-WHOLE-VECTOR.SEQ.GENERATE
 ITERATE.TEST::DEFMACRO-CLAUSE.2 ITERATE.TEST::MAXING.1
 ITERATE.TEST::MAXING.2 ITERATE.TEST::MAXING.3 ITERATE.TEST::DISPLAY.1
 ITERATE.TEST::DISPLAY.2 ITERATE.TEST::MULTIPLE-VALUE-PROG1.1
 ITERATE.TEST::IGNORE-ERRORS.1 ITERATE.TEST::IGNORE-ERRORS.2
 ITERATE.TEST::HANDLER-BIND.1 ITERATE.TEST::DESTRUCTURING-BIND.1
 ITERATE.TEST::DESTRUCTURING-BIND.2 SYMBOL-MACROLET WITH-SLOTS
 WITH-ACCESSORS ITERATE.TEST::BUG/WALK.1
Test ITERATE.TEST::BUG/WALK.2 failed
Form: (ITERATE:ITER (RETURN (IF (ODDP 1) (PROGN) 'ITERATE.TEST::EVEN)))
Expected value: NIL
Actual value: ITERATE.TEST::EVEN.
Note: These tests generate warnings involving MACROLET within Iterate
;;; Warning: Iterate:
Iterate does not know how to handle the special form (MACROLET ((ITERATE.TEST::FOO
                                                                    ()
                                                                  1))
                                                       (ITERATE:MULTIPLYING
                                                        (ITERATE.TEST::FOO)))
It will not be walked, which means that Iterate clauses inside it will not be seen.
 ITERATE.TEST::BUG/MACROLET.2
;;; Warning: Iterate, in clause (MULTIPLYING
                                 (MACROLET ((FOO ()
                                              1))
                                   (FOO))):
Iterate does not know how to handle the special form (MACROLET ((ITERATE.TEST::FOO
                                                                    ()
                                                                  1))
                                                       (ITERATE.TEST::FOO))
It will not be walked, which means that Iterate clauses inside it will not be seen.
 ITERATE.TEST::MACROLET.3 ITERATE.TEST::NESTED-HASHTABLE.1
 ITERATE.TEST::NESTED.IN-HASHTABLE.2 ITERATE.TEST::NESTED.IN-HASHTABLE.3
54  ITERATE.TEST::NESTED.IN-PACKAGE ITERATE.TEST::MACROLET.LOOP-FINISH
 ITERATE.TEST::TAGBODY.NIL-TAGS ITERATE.TEST::WALK.TAGBODY.1
 ITERATE.TEST::WALK.TAGBODY.2
9 out of 261 total tests failed: ITERATE.TEST::FOR.DO-NEXT.1, ITERATE.TEST::FOR.DO-NEXT.2, 
   ITERATE.TEST::FOR.DO-NEXT.3, ITERATE.TEST::FOR.DO-NEXT.WALK, 
   ITERATE.TEST::FOR.DO-NEXT.PREVIOUS, ITERATE.TEST::CODE-MOVEMENT.ELSE, 
   ITERATE.TEST::CODE-MOVEMENT.FINALLY, 
   ITERATE.TEST::CODE-MOVEMENT.FINALLY-PROTECTED, 
   ITERATE.TEST::BUG/WALK.2.