On Jun 21, 2012, at 1:24 AM, Eli Barzilay wrote:

> An hour and a half ago, John Clements wrote:
> 
> 
>> Yes, of course I can do it the ugly way:
>> [...]
>> (define p1 (mcons #f 'bogus))
>> (set-mcdr! p1 p1)
>> (define true-then-falses (mcons #t p1))
> 
> What about
> 
>  (shared ([fs (cons #f fs)]) (cons #t fs))
>  (cons #t (shared ([fs (cons #f fs)]) fs))

Right! Shared is what I was thinking of. Many thanks.

John

Attachment: smime.p7s
Description: S/MIME cryptographic signature

_________________________
  Racket Developers list:
  http://lists.racket-lang.org/dev

Reply via email to