Macro Setypecase

Part of:

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

Like ETYPECASE, except binds the keyform to IT (via SYMBOL-MACROLET) for
the scope of the cases. IT can be set with SETF.