Macro Atypecase

Part of:

package anaphora
( atypecase < keyform > &body < cases > )

Like TYPECASE, except binds the result of the keyform to IT (via LET) for
the scope of the cases.