chicken-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Chicken-users] Handling unstandard reader macros.


From: Pupeno
Subject: Re: [Chicken-users] Handling unstandard reader macros.
Date: Thu, 24 Nov 2005 09:50:37 -0300
User-agent: KMail/1.8.3

On Thursday 24 November 2005 04:17, felix winkelmann wrote:
> Then you must been doing something wrong...
>
> (set-dispatch-read-syntax!
>  #\>
>  (lambda (p)
>    (let loop ()
>      (let ((c (read-char p)))
>        (cond ((eof-object? c) (error "unexpected end of file"))
>            ((char=? c #\<)
>             (if (char=? #\# (read-char p))
>                 #f
>                 (loop)))
>            (else (loop)))))))
>
> (pp (with-input-from-string "(1 2 #\\d #t)" read))
> (pp (with-input-from-string "#> ... nothing ... <#" read))

This worked. Thanks.
Note: 
http://www.call-with-current-continuation.org/manual/Reader-extensions.html#index-set_002ddispatch_002dread_002dsyntax_0021-231
 
specifies only one argument for set-dispatch-read-syntax!, that confused me.

-- 
Pupeno <address@hidden> (http://pupeno.com)

Attachment: pgp0_N8hrB1A6.pgp
Description: PGP signature


reply via email to

[Prev in Thread] Current Thread [Next in Thread]