Hi,

please bear in mind that I'm Lisp newbee. When I try to load iterate (1.4.3) I get the warnings and one error below.

Many thanks for a hint, Helmut

; in: DEFMACRO WITH-TEMPORARY ; `(LET ((,ITERATE::OLD-VAR ITERATE::*TEMPS-IN-USE*)) ; (UNWIND-PROTECT ; (LET ,(MAPCAR #'(LAMBDA # `#) ITERATE::VARS) ; . ,ITERATE::BODY) ; (SETQ ITERATE::*TEMPS-IN-USE* ,ITERATE::OLD-VAR))) ; --> SB-IMPL::|List| SB-IMPL::|List| SB-IMPL::|List*| MAPCAR LET LET ; --> SB-INT:DO-ANONYMOUS BLOCK LET TAGBODY TAGBODY SB-KERNEL:%RPLACD ; --> SETQ THE LIST CONS ; ==> ; (SB-C::%FUNCALL #:G2 (CAR #:G1)) ; ; caught WARNING: ; function called with one argument, but wants exactly zero ; See also: ; The ANSI Standard, Section 3.2.2.3

; file: /home/jarausch/Lisp_My/TEST/iterate.lisp ; in: DEFMACRO WITH-TEMPORARY ; `(LET ((,ITERATE::OLD-VAR ITERATE::*TEMPS-IN-USE*)) ; (UNWIND-PROTECT ; (LET ,(MAPCAR #'(LAMBDA # `#) ITERATE::VARS) ; . ,ITERATE::BODY) ; (SETQ ITERATE::*TEMPS-IN-USE* ,ITERATE::OLD-VAR))) ; --> SB-IMPL::|List| SB-IMPL::|List| SB-IMPL::|List*| MAPCAR LET ; --> SB-KERNEL:%COERCE-CALLABLE-TO-FUN FUNCTION SB-INT:QUASIQUOTE ; ==> ; (SB-IMPL::|List*| ITERATE::!1 '((ITERATE::GET-FREE-TEMP))) ; ; caught WARNING: ; undefined variable: !1 ;

The following errors occurs in several functions

; in: DEFUN RETURN-COLLECTION-CODE ; (ITERATE::WITH-TEMPORARY ITERATE::TEMP-VAR ; (LET* ((ITERATE::UPDATE-CODE ; `(IF ,ITERATE::COLLECT-VAR ; # ; #)) ; (ITERATE::MAIN-CODE (COND # # #))) ; (ITERATE::RETURN-CODE :BODY ; `((PROGN ; ,.ITERATE::MAIN-CODE ; ,ITERATE::COLLECT-VAR)) ; :FINAL ; (IF (EQ ITERATE::RESULT-TYPE 'LIST) ; NIL ; `(#))))) ; ; caught ERROR: ; during macroexpansion of ; (WITH-TEMPORARY TEMP-VAR ; (LET* # ; #)).