On Mon 20 Jul 2009 21:09, "Kjetil S. Matheussen" <k.s.matheus...@notam02.no> 
writes:

> On Mon, 20 Jul 2009, Bill Schottstaedt wrote:
>
>> For some reason, this code strikes me as funny:
>>
>> (let ((j (lambda () 0))
>>      (k 0))
>>  (do ((i (j) (j))
>>        (j (lambda () 1) (lambda () (+ i 1))))
>>          ((= i 3) k)
>>     (set! k (+ k i))))

I get an endless loop here, at least with the VM. But I will have to
admit that I never did understand `do' ;-)

Andy
-- 
http://wingolog.org/


Reply via email to