Re: [Chicken-users] tinyclos and the repl

[Jim Ursetto]

On Thu, Jul 24, 2008 at 9:53 AM, Jörg F. Wittenberger
<address@hidden> wrote:
> It assumes that it can call "read" on a port when peek-char
> returns #\( and assumes that, once "read" read the expression, can
> continue to read from the port right after the corresponding #\) .
> Unfortunately chicken's read has already read from the port until the
> next #\( - so the SRFI-49 code gets confused.  Does anybody have a nice
> Scheme reader in pure Scheme or Chicken-Scheme at hand?

Can you reproduce the issue in a short example?  I don't see the
issue, as I understand it, here:

#;> (with-input-from-string "(1) 2 (3)"
           (lambda () (print (peek-char) (read) (peek-char) (read) (read))))
((1) 2(3)