May 2012 - alexandria-devel - mailman3.common-lisp.net

[alexandria-devel] latest alexandria doesn't build on ECL due to non-standard LOOP
by Anton Vodonosov 18 Jan '18

18 Jan '18

Hello. Alexandria in the latest quicklisp has a regression comparing to quicklisp 2012-02-08. It doesn't build on ECL because on non-standard LOOP construct (it is tolerated by most Lisps, but not by ECL; see here: http://comments.gmane.org/gmane.lisp.ecl.general/3344) The compiler complains about copy-stream method in io.lisp. Build logs: https://cl-test-grid.appspot.com/blob?key=AMIfv97xRRWJgLOa5TvS78VriRK9mQ82m… Best regards, - Anton

2 1

[alexandria-devel] [Patch]: Fix an example in the docstring of iota.
by Stas Boukarev 26 Jan '13

26 Jan '13

An example in the docstring of iota was (iota 4) => (0 1 2 3 4) while it should've been (iota 4) => (0 1 2 3). -- With best regards, Stas.

2 4

[alexandria-devel] Question about FORMAT-SYMBOL
by Luís Oliveira 26 Jan '13

26 Jan '13

Hello, I often try to support Allegro's modern mode by doing things like (format-symbol t "~A-~A" :foo :bar). We just came across an issue on #quicklisp where a user had set his *PRINT-CASE* to :DOWNCASE and that caused FORMAT-SYMBOL to intern lower-case symbols, thus breaking the idiom I described. Should fix my code to use SYMBOLICATE instead or should FORMAT-SYMBOL use WITH-STANDARD-IO-SYNTAX? Any opinions? -- Luís Oliveira http://r42.eu/~luis

5 8

[alexandria-devel] Nesting
by Faré 26 May '12

26 May '12

I've found the following definitions incredibly useful in (nest) allowing indentation to not get out of hand (nest) getting the good feeling of that binding has other languages (tsen) focusing on the thing at hand, not the intermediate definitions needed (tsen) "piping" results into a series of functions or forms. I don't like the name "tsen", though. "wrap" comes to mind. Maybe you have better suggestions. ;;; Nesting binding forms (from a suggestion by marco baringer) (defmacro with-nesting ((&key (from-end t)) &rest things) (if from-end `(nest ,@things) `(tsen ,@things))) (defmacro nest (&rest things) (reduce #'(lambda (outer inner) (append outer (list inner))) things :from-end t)) (defmacro tsen (&rest things) (reduce #'(lambda (inner outer) (append outer (list inner))) things :from-end nil)) In any case, I'd like these to become a standard part of alexandria. —♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org Gauss, when asked how soon he expected to reach certain mathematical conclusions, replied that he had reached them long ago, all he was worrying about was how to reach them! [Karl F. Gauss (1777-1855), German mathematician]

1 0