Path: ...!feeds.phibee-telecom.net!2.eu.feeder.erje.net!feeder.erje.net!eternal-september.org!feeder3.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: "B. Pym" <Nobody447095@here-nor-there.org>
Newsgroups: comp.lang.lisp,comp.lang.scheme
Subject: Re: Collection utilities
Date: Sat, 7 Sep 2024 02:25:31 -0000 (UTC)
Organization: A noiseless patient Spider
Lines: 14
Message-ID: <vbgdip$157e3$1@dont-email.me>
MIME-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Injection-Date: Sat, 07 Sep 2024 04:25:32 +0200 (CEST)
Injection-Info: dont-email.me; posting-host="1890f914c1703e0604d6edeadffbf5ce";
	logging-data="1220035"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX19asb0FT7iIh2kEn6dSPnQf"
User-Agent: XanaNews/1.18.1.6
Cancel-Lock: sha1:/EyaQeu6x6blO9UeUVOAlFhJCRo=
Bytes: 1182

Software Scavenger wrote:

> LOOP is powerful, general, and standard.  E.g.
> 
> CL-USER 5 > (loop as i below 5 collect i collect (* i 2))
> (0 0 1 2 2 4 3 6 4 8)

Gauche Scheme

(use srfi-42) ; append-ec

(append-ec (: i 5) (list i (* i 2)))
 ===>
(0 0 1 2 2 4 3 6 4 8)