no continuations

[Ashley Yakeley]

In article <20040112005635.CB12DAB8D at Adric.metnet.navy.mil>,
 oleg at pobox.com wrote:

> (let ((cont #f))
>   (letrec ((x (call-with-current-continuation (lambda (c) (set! cont c) 0)))
> 	   (y (call-with-current-continuation (lambda (c) (set! cont c) 0))))
>     (if cont
>       (let ((c cont))
> 	(set! cont #f)
> 	(set! x 1)
> 	(set! y 1)
> 	(c 0))
>       (+ x y))))
> 
> Could you tell me what does this test return on your system?

It causes hscheme to exit silently. Very odd. I'll try to fix it, but I 
suspect it's something fundamental to my design, and connected to 
precisely these issues.

-- 
Ashley Yakeley, Seattle WA