Does "case" work on widgets?

From: Grant Edwards <>
Date: Mon, 24 Oct 1994 17:07:22 -0500 (CDT)

The "case" construct doesn't seem to work with widgets. For example
the following code:

  (define z (case .m
                (.m ".m")
                (.x ".x")
                (else "other")))

  (write z)

Will print "other" when I expect it to print ".m" (I checked and eqv?
returns true for (eqv? .m .m).

If the "case" is re-written as a "cond" using eqv? then it works, so
it's not a big deal, but I thought I'd let everybody know.

Grant Edwards
Rosemount Inc.
Received on Mon Oct 24 1994 - 23:27:03 CET

This archive was generated by hypermail 2.3.0 : Mon Jul 21 2014 - 19:38:59 CEST