Error while loading iterate

30 views
Skip to first unread message

martin....@googlemail.com

unread,
Nov 8, 2016, 2:58:34 PM11/8/16
to Quicklisp
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

unread,
Nov 8, 2016, 3:27:16 PM11/8/16
to martin.buchmann via Quicklisp
Hmm, what do you get from (ql:where-is-system "iterate")?

Zach

martin....@googlemail.com

unread,
Nov 8, 2016, 3:41:55 PM11/8/16
to Quicklisp, xa...@xach.com
#P"/Users/Martin/Documents/src/lisp/quicklisp/dists/quicklisp/software/iterate-20110219-darcs/"

Zach Beane

unread,
Nov 9, 2016, 6:59:48 AM11/9/16
to martin....@googlemail.com, Quicklisp
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

unread,
Nov 9, 2016, 7:12:17 AM11/9/16
to Zach Beane, Quicklisp
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
Reply all
Reply to author
Forward
0 new messages