Re: [r6rs-discuss] [Scheme-reports] Scheme pattern matching: the case for (case)

[Peter Kourzanov <peter.kourzanov@x>]

And now do:

(define eqv? equal?)
(newline)
(write (case "asd" (("asd") #t)))
(newline)

You'll find Tinyscheme, Minischeme, MIT, Scheme48/SCSH
included in your list. Ypsilon and Stalin exhibit this
behaviour for strings, but not for more structured data 
like vectors.

On Wed, 2010-12-22 at 11:55 -0500, John Cowan wrote:
> Eli Barzilay scripsit:
> 
> > Is there really any implementation where
> > 
> >   (let ((eqv? #f)) (case 1 ((1) 1)))
> > 
> > throws an error?  (I don't know of any, but if there is one, it should
> > be a case for a bug report rather than something to draw conclusions
> > from.)
> 
> Yes: Bigloo, STklos, and Scheme 9 all have this problem.  Racket, Gauche,
> MIT, Gambit, Chicken, Scheme48/scsh, Guile, Kawa, SISC, Chibi, Chez,
> SCM, Ikarus, Larceny, Ypsilon, Mosh, and SSCM do not.
> 



_______________________________________________
r6rs-discuss mailing list
r6rs-discuss@x
http://lists.r6rs.org/cgi-bin/mailman/listinfo/r6rs-discuss