(eval-when (:compile-toplevel :load-toplevel :execute)
(if (find-package 'sb-mop)
(setq cl:*features* (delete :sb-mop cl:*features*))
(eval-when (:compile-toplevel :load-toplevel :execute)
(if (find-package 'sb-mop)
(setq cl:*features* (delete :sb-mop cl:*features*))