----- Original Message ----- From: Luke Crook luke@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
ktilton@nyc.rr.com writes:
Does this help? Or, does it not work?:
(defpackage :cells ... #+cormanlisp #:common-lisp ...
#-(or allegro clisp cmu cormanlisp lispworks mcl sbcl)...
Making progress, thanks.
(pushnew #p"C:/Lisp/libs/" asdf-util:*source-dirs* :test #'equal) (#P"C:\Lisp\libs") (asdf:oos 'asdf:load-op :cells) ; loading system definition from #P"C:\Lisp\libs\cells_2.0\cells.asd" ; into #<PACKAGE "ASDF7512"> ; registering #<SYSTEM :CELLS #xF21D38> as CELLS ;;; Warning: the following function(s) are called from forms ;;; in file "#P"C:\Lisp\libs\cells_2.0\cell-types.lisp"" but have not yet been defined: ;;; C-BREAK ;;; C-OPTIMIZE-AWAY?! ;;; MD-STATE ;;; C-CURRENTP ;;; An error occurred in function MACROEXPAND: ;;; Error: There is no SETF expansion method defined for (MD-SLOT-CELL-TYPE CLASS-NAME SLOT-NAME) ;;; Entering Corman Lisp debug loop. ;;; Use :C followed by an option to exit. Type :HELP for help. ;;; Restart options: ;;; 1 Retry performing #<ASDF:LOAD-OP NIL #x1078270> on #<ASDF:CL-SOURCE-FILE "model-object" #x1057EE8>. ;;; 2 Continue, treating #<ASDF:LOAD-OP NIL #x1078270> on #<ASDF:CL-SOURCE-FILE "model-object" #x1057EE8> as having been successful. ;;; 3 Abort to top level.
-
ktilton＠nyc.rr.com -
Luke Crook