Path: nntp.eternal-september.org!news.eternal-september.org!eternal-september.org!.POSTED!not-for-mail
From: "B. Pym" <Nobody447095@here-nor-there.org>
Newsgroups: comp.lang.lisp,comp.lang.scheme
Subject: Re: [newbie] I need a function for read user input.
Date: Mon, 7 Jul 2025 20:19:27 -0000 (UTC)
Organization: A noiseless patient Spider
Lines: 14
Message-ID: <104ha4e$33drg$1@dont-email.me>
References: <vc2g58$12ukb$2@dont-email.me>
MIME-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Injection-Date: Mon, 07 Jul 2025 22:19:28 +0200 (CEST)
Injection-Info: dont-email.me; posting-host="e79444460713f376220492a49e18aeab";
	logging-data="3258224"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX1/aaXHIZBv+2+AgRvNYvZeF"
User-Agent: XanaNews/1.18.1.6
Cancel-Lock: sha1:27N784xVhI4wkKm1WBcG3FB2/4c=

B. Pym wrote:

> Another way:
> 
> (use srfi-42) ; list-ec
> 
> (list-ec (:port word input) word)

Shorter:

(define input (current-input-port))

(list-ec (: word input) word)