UNFINISHED started porting to LispWorks.
reverted macro (_ obj slot) to use (slot-value ...) instead of slot accessors for LispWorks compatibility