Done. I added two tests, for good measure :-). Noah
On Sun, Feb 19, 2012 at 4:53 AM, Andy Wingo <wi...@pobox.com> wrote: > On Sat 18 Feb 2012 17:20, Noah Lavine <noah.b.lav...@gmail.com> writes: > >> Here is another patch that fixes the first of my examples. (let* ((x >> (random)) (y x)) (eq? x y)) now folds to (begin (random) #t). It >> turned out to be much smaller than the previous approach. Is it all >> right if I push this? > > Looks good to me, if you add a test at the same time :-) > > Andy > -- > http://wingolog.org/