Error while loading iterate

[martin....@googlemail.com]

Hi,

thank you so much for Quicklisp :-) 

Being just a hobbyist it helped me a lot getting started with Lisp. I am not sure if this is the right place to ask, please redirect me if not.

I tried to load the iterate package but ended up with the error below. While I understand that there is a problem with the number of arguments of the macro with-temporary, I totally fail to understand it any further. I am using SBCL (1.3.10) on OS X, if this matters. 

Any advice will be highly appreciated

  Martin

CL-USER> (ql:quickload :iterate)

To load "iterate":

  Load 1 ASDF system:

    iterate

; Loading "iterate"

.............................; 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* #

;       #)).

;   Use *BREAK-ON-SIGNALS* to intercept.

;   

;    invalid number of arguments: 1

.

; file: /Users/Martin/Documents/src/lisp/quicklisp/dists/quicklisp/software/iterate-20110219-darcs/iterate.lisp

; in:

;      DEFCLAUSE (ADJOINING EXPR &OPTIONAL INTO VAR AT (PLACE 'END) TEST

;             (TEST '#'EQL) RESULT-TYPE (TYPE 'LIST))

;     (ITERATE::WITH-TEMPORARY ITERATE::TEMP

;       (ITERATE::RETURN-COLLECTION-CODE :VARIABLE ITERATE::VAR :EXPRESSION

;        ITERATE::EXPR :START-OPERATION

;        `(SUBST (ITERATE::EXPR ITERATE::VAR)

;                (PROGN

;                 ,ITERATE::TEMP

;                 (ADJOIN ITERATE::EXPR ITERATE::VAR :TEST ,ITERATE::TEST)))

;        :TEST `(SUBST (ITERATE::VAR ITERATE::EXPR) (PROGN (SETQ #) (NOT #)))

;        :END-OPERATION `(SUBST (ITERATE::VAR ITERATE::EXPR) (LIST ,ITERATE::TEMP))

;        :ONE-ELEMENT ...))

; 

; caught ERROR:

;   during macroexpansion of

;   (WITH-TEMPORARY TEMP

;     (RETURN-COLLECTION-CODE :VARIABLE VAR ...)).

;   Use *BREAK-ON-SIGNALS* to intercept.

;   

;    invalid number of arguments: 1

; in:

;      DEFCLAUSE (ADJOINING EXPR &OPTIONAL INTO VAR AT (PLACE 'END) TEST

;             (TEST '#'EQL) RESULT-TYPE (TYPE 'LIST))

;     (ITERATE::WITH-TEMPORARY ITERATE::TEMP

;       (ITERATE::RETURN-COLLECTION-CODE :VARIABLE ITERATE::VAR :EXPRESSION

;        ITERATE::EXPR :START-OPERATION

;        `(SUBST (ITERATE::EXPR ITERATE::VAR)

;                (PROGN

;                 ,ITERATE::TEMP

;                 (ADJOIN ITERATE::EXPR ITERATE::VAR :TEST ,ITERATE::TEST)))

;        :TEST `(SUBST (ITERATE::VAR ITERATE::EXPR) (PROGN (SETQ #) (NOT #)))

;        :END-OPERATION `(SUBST (ITERATE::VAR ITERATE::EXPR) (LIST ,ITERATE::TEMP))

;        :ONE-ELEMENT ...))

; 

; caught ERROR:

;   during macroexpansion of

;   (WITH-TEMPORARY TEMP

;     (RETURN-COLLECTION-CODE :VARIABLE VAR ...)).

;   Use *BREAK-ON-SIGNALS* to intercept.

;   

;    invalid number of arguments: 1

...; 

   ; compilation unit aborted

   ;   caught 2 fatal ERROR conditions

   ;   caught 3 ERROR conditions

(:ITERATE)

[Zach Beane]

Hmm, what do you get from (ql:where-is-system "iterate")?

Zach

[martin....@googlemail.com]

#P"/Users/Martin/Documents/src/lisp/quicklisp/dists/quicklisp/software/iterate-20110219-darcs/"

[Zach Beane]

The Quicklisp dist has been updated a lot since then. Can you try this?

(ql:update-dist "quicklisp")
(ql:quickload "iterate")

Thanks,
Zach

martin....@googlemail.com writes:

> #P"/Users/Martin/Documents/src/lisp/quicklisp/dists/quicklisp/software/iterate-20110219-darcs/"
>
>
> Am Dienstag, 8. November 2016 21:27:16 UTC+1 schrieb Zach Beane:
>>
>> Hmm, what do you get from (ql:where-is-system "iterate")?
>>
>> Zach
>>

>> "martin.buchmann via Quicklisp" <quic...@googlegroups.com <javascript:>>

[Martin Buchmann]

Zach,

that's weird. I am updating every months after you announce the Update. Nevertheless, I will check as soon as I have access to my computer.

Regards
Martin

Von meinem iPhone gesendet