From: David Bakhash
Subject: CASE using #'equalp
Date: 
Message-ID: <c29puqmdyn0.fsf@mint-square.mit.edu>
not that it's hard to write from scratch, but is there a way to write a
CASE statement where the `test' operator can be changed to something
like #'EQUALP?  I of course see that CASE, as it is now, doesn't have
that feature.  So what's the best way, without resorting to COND?

dave
From: Thomas A. Russ
Subject: Re: CASE using #'equalp
Date: 
Message-ID: <ymiya5akrnb.fsf@sevak.isi.edu>
I think you get to write your own macro for that.

What isn't immediately clear, however, is what a reasonable syntax for
such a case statement would be.  Maybe:

  (defmacro test-case ((test-item &key test) &body cases)
   ...
   )

A call would look like:

(test-case ((compute-a-blag a b c) :test #'equalp)
  (frolitz ...)
  (billitz ...)
  ...)




-- 
Thomas A. Russ,  USC/Information Sciences Institute          ยทยทยท@isi.edu