[cells-devel] Where's the MOP?

[ktilton at nyc.rr.com]

----- Original Message -----
From: Luke Crook <luke at balooga.com>
Date: Tuesday, June 21, 2005 3:07 pm
Subject: [cells-devel] Where's the MOP?

> 
> Kenny, 
> 
> Ok, throw me a bone. How do I specify the location of the MOP for 
> Corman 
> Lisp? 

Does this help? Or, does it not work?:

(defpackage :cells
    (:use #:common-lisp #:utils-kt)
    (:import-from
     ;; MOP
     #+allegro #:excl
     #+clisp #:clos
     #+cmu #:mop
     #+cormanlisp #:common-lisp
     #+lispworks #:clos
     #+sbcl #:sb-mop
     #+openmcl-partial-mop #:openmcl-mop
     #+(and mcl (not openmcl-partial-mop)) #:ccl

     #-(or allegro clisp cmu cormanlisp lispworks mcl sbcl)
     #.(cerror "Provide a package name."
	       "Don't know how to find the MOP package for this Lisp.")
     
     #:class-precedence-list
     #-(and mcl (not openmcl-partial-mop)) #:class-slots
     #-clisp #:slot-definition-name
     )
   .....etc......

kenny