在Common Lisp中，编写定义类的宏的最佳方法是什么？

I'm trying to write a macro in Common Lisp that defines a class with variant slots I specify. So far it's worked OK (and I've been very impressed with clisp!) for this:I'm trying to write a macro in Common Lisp that