;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Apr 2003
;;;;
-;;;; $Id: mop.lisp,v 1.15 2003/06/25 18:08:09 kevin Exp $
+;;;; $Id: mop.lisp,v 1.18 2003/07/30 19:04:41 kevin Exp $
;;;;
;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
#+kmr-cmucl-mop #:mop
#+allegro #:mop
#+lispworks #:clos
- #+scl #:clos))
+ #+scl #:clos
+ #+openmcl #:openmcl-mop
+ )
+ )
(in-package #:kmr-mop)
;; note: make-method-lambda is not fbound
)
#+openmcl
- '(openmcl-mop::standard-class
- openmcl-mop::slot-definition-name openmcl-mop:finalize-inheritance
+ '(openmcl-mop::slot-definition-name openmcl-mop:finalize-inheritance
openmcl-mop::standard-direct-slot-definition openmcl-mop::standard-effective-slot-definition
openmcl-mop::validate-superclass openmcl-mop:direct-slot-definition-class openmcl-mop::effective-slot-definition-class
openmcl-mop:compute-effective-slot-definition