[plt-scheme] minor bug

>   (let-syntax ((foo (syntax-rules () ((_ var) (define var 1)))))
>      (let ((x 2))
>        (begin (define foo +))
>        (cond (else (foo x)))
>        x))
> ==correct evaluation==> 2
> I say:
> ==drscheme v200alpha19 evaluation==> 1

Unfortunately, this bug in `cond' didn't get fixed for v200. It will be
fixed in the very next version (200.1?).

Matthew