- iterate-devel - mailman3.common-lisp.net

[iterate-devel] Fwd: if-first-iteration, a little better version as an arch patch
by Attila Lendvai 07 Jan '06

07 Jan '06

hello again, sorry for the flood, this i a little better version of if-first-iteration that creates only one variable. and a tla undo patch this time. happy coding, - attila ps: the attachment is very small, but if it's not welcome to send patches to the list please tell me where to send them.

1 0

[iterate-devel] ASDF installability of the package
by Ignas Mikalajunas 07 Jan '06

07 Jan '06

Hi, i wanted to download the most current iterate, but i am geting 403 error. Should I just use 1.4.0 or is that a bug ? Ignas Mikalajūnas

3 2

[iterate-devel] if-first-iteration
by Attila Lendvai 07 Jan '06

07 Jan '06

hi! thanks for iterate, it's coool! :) i'm new to lisp, and while hacking i was missing if-first-iteration which is enclosed in the mail. sorry for a simple paste, but learning arch seems to be a bigger task then writing the actual feature. it was fun looking at a complex macro lib. bear with me if the code is naive, i'm way too new to lisp for patches like this. i think the clause name tells it all, feel free to include. happy coding, - attila lendvai (def-special-clause IF-FIRST-ITERATION (then &optional else) (setf then (list (walk-expr then))) (setf else (list (walk-expr else))) (let ((var (make-var-and-binding 'first-iteration t :type 'boolean))) (return-code :body (list (if else `(cond (,var ,@then) (t ,@else)) `(when ,var ,@then))) :step (list `(setf ,var nil)))))

1 0

Re: [iterate-devel] Iterate download error
by Hoehle, Joerg-Cyril 05 Jan '06

05 Jan '06

François-René ÐVB Rideau wrote: >For portability reasons, maintainability, future proofness, I think >you really need use such a MY-DELETE function, even on implementation >that *currently* provide the "obvious" implementation of DELETE. Ok, will do. I should stick to what I propagate most of the time :-) Better feel safe than sorry. Regards, Jörg

1 0

Re: [iterate-devel] Iterate download error
by Hoehle, Joerg-Cyril 05 Jan '06

05 Jan '06

Marc Battyani wrote: >Oops sorry. I really thought it was up to date. I will change it. Thanks. >I have an email from you dated 20 december 2005. Is that the >latest one? That day, I just forwarded the June version. >Also I added some patches sent by Fare in the cl-pdf version. They are not in what I sent you (bug was not known in June). Feel free to change the one delete -> (remove nil temps) It's clearly a bug. During holidays I revisited the two other changes. In remove-clause: (delete entry index) -> (setq index (delete entry index)) I decided *not* to leave that in the code (but add a comment) because (setq index ...) is a noop: index is local variable, and the function is just about to exit, so nobody cares about it's value. The code depends on non-guaranted behaviour of DELETE, basically that it implements the naive / canonical operation: RPLACD the previous CDR. Adding (setq index ...) would gain nothing in a Lisp which would provide another implementation of DELETE. E.g. (setf (fdefinition 'delete) #'remove) -- REMOVE is AFAIK a legal implementation of DELETE. Remove-clause would break. As I have not yet seen such other implementation, I've not bothered to write MY-DELETE to guarantee the behaviour needed by Iterate, or implement a different approach. If somebody yells that's not acceptable, please do so. I might change my opinion. Faré, since you reported that it's sbcl who pointed you to delete in Iterate, I'd like to know which version you used. I could not reproduce a warning with sbcl-0.9.2 (as found in Ubuntu/Breezy). Regards, Jörg Höhle.

2 1

[iterate-devel] Iterate download error
by Surendra Singhi 05 Jan '06

05 Jan '06

The following message is a courtesy copy of an article that has been posted to gmane.lisp.web.uncommonweb.devel as well. Hi, The download link for iterate both on the home page and cliki gives error and doesn't work. http://common-lisp.net/project/iterate/releases/iterate-current.tar.gz Thanks. -- Surendra Singhi http://www.public.asu.edu/~sksinghi/index.html ,---- | WHY SHOULD WE SAVE TIGER? | Ans: Saving the tiger means saving mankind.. | | Help http://pudang.tripod.com/ | or https://secure.worldwildlife.org/forms/tiger_appeal_1.cfm `----

2 1

Re: [iterate-devel] Iterate download error
by Hoehle, Joerg-Cyril 05 Jan '06

05 Jan '06

Marc Battyani wrote: >This is for this kind of problem that I keep an up to date >ITERATE version in cl-pdf. ;-) I'm sorry, Marc, it is not up to date :-( I recently looked at your online cl-pdf repository only to discover that it contains the Iterate version as of February/March 2005. I'm sure I sent you the June 2005 version half a year ago. readme-pdf says: "This version is known to work well with cl-pdf and cl-typesetting". This can also be read as "don't trust the current or more recent versions" or "I haven't tested anything more recent so I can't tell nor make guarantees". I don't like the taste of that phrase, but I can fully understand that you provide a full package with all dependencies instead of having people fetch a half-dozen utility packages themselves. Hopefully, a Debian distribution will split things up and permit independent evolution of packages. I bet that my most current versions works equally well, if not better. I believe you just didn't get to update your copy of iterate in cl-pdf, because cl-pdf is essentially stable and you've been working on other things since then. >Interested people can get it from there until the official >site is OK again. I cannot recommend that until you update to what I sent you last June. I'll check whether the mailing list archives (or allows) attachments. Then I should send updates to the list, instead of to a few individual persons like I did back on 23rd of June 2005 (to Marco Baringer, you, Peter van Eynde, and CC: Kevin Rosenberg and Mark Williams). Of course, the best solution would be for me to get write access to common-lisp.net. I'll see how far I can get there. BTW, I'm slowly preparing an update to the June version - don't hold your breath! Interested people can get an interim version for compatibility testing from me (very little changes so far, I mostly increased testing coverage). Regards, Jörg

2 1

Re: [iterate-devel] Iterate download error
by Hoehle, Joerg-Cyril 05 Jan '06

05 Jan '06

Surendra Singhi wrote: > The download link for iterate both on the home page and cliki >gives error and doesn't work. >http://common-lisp.net/project/iterate/releases/iterate-current.tar.gz I suppose this is related to the bug reported by Rune Nesheim on 29th of December and analysed by Andreas Fuchs: please wait for Marco Baringer to come back from holidays (I suppose) and change some file permissions on the UNIX server. I'm sorry for the inconvenience. Regards, Jorg Hohle.

2 1

[iterate-devel] 403 FORBIDDEN
by Rune Nesheim 26 Dec '05

26 Dec '05

http://common-lisp.net/project/iterate/releases/iterate_1.4.1.tar.gz 403 FORBIDDEN, this also means asdf:install is broken for iterate.

1 0

Re: [iterate-devel]/[series-users] collect-tail ?
by Hoehle, Joerg-Cyril 20 Dec '05

20 Dec '05

Chris Dean wrote: >[1] The anatomy of a loop: a story of scope and control. > Olin Shivers. > http://www.cc.gatech.edu/~shivers/citations.html#loop > >[2] Eager Comprehensions in Scheme: The design of SRFI-42 > Sebastian Egner > http://www.deinprogramm.de/scheme-2005/program.html Thank you very much for these pointers. I'm very happy to see research in iteration in a way that is potentially useable for CL (unlike iteration constructs in many other languages). I'm still looking for the ideal construct myself. :-) >This is my standard looping question in any language: Read the last N >lines of a file, transform them, filter them, and return the unique >elements. Not trivial, even with SRFI-42. It's interesting how Iterate and SRFI-42 appear somewhat inside-out: one has COLLECT buried somewhere inside the body, the other right upfront (list-ec). OTOH, one has the form to be collected buried deep inside, the other right next to COLLECT. Good reading. Regards, Jorg Hohle

2 1