[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [CM] funny scheme code (fwd)
From: |
Andy Wingo |
Subject: |
Re: [CM] funny scheme code (fwd) |
Date: |
Fri, 24 Jul 2009 00:19:41 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.0.92 (gnu/linux) |
On Mon 20 Jul 2009 21:09, "Kjetil S. Matheussen" <address@hidden> 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/