;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Apr 2003
;;;;
-;;;; $Id: mop.lisp,v 1.8 2003/04/29 05:54:24 kevin Exp $
+;;;; $Id: mop.lisp,v 1.9 2003/04/29 05:57:24 kevin Exp $
;;;;
;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
clos:make-method-lambda clos:generic-function-lambda-list
clos::compute-slots)
#+sbcl
- '(sb-pcl:class-of sb-pcl:class-name sb-pcl:class-slots sb-pcl:find-class
+ '(#+kmr-sbcl-mop class-of #-kmr-sbcl-mop sb-pcl:class-of
+ #+kmr-sbcl-mop class-name #-kmr-sbcl-mop sb-pcl:class-name
+ #+kmr-sbcl-mop class-slots #-kmr-sbcl-mop sb-pcl:class-slots
+ #+kmr-sbcl-mop find-class #-kmr-sbcl-mop sb-pcl:find-class
sb-pcl::standard-class
sb-pcl:slot-definition-name sb-pcl::finalize-inheritance
sb-pcl::standard-direct-slot-definition