From ocorrain at yahoo.com  Sat Jun 18 14:31:55 2005
From: ocorrain at yahoo.com (=?iso-8859-1?Q?Tiarn=E1n_=D3_Corr=E1in?=)
Date: Sat, 18 Jun 2005 15:31:55 +0100
Subject: [cells-devel] Current status of Cello openMCL?
Message-ID: <m2ekazenxg.fsf@Cascade.local>

Hi--

What is the current status of Cello on openMCL/Mac OS X? If there is a
port , I'd be interested in using it. If no port exists, I'd be
willing to try to create it.

-- 
Tiarn?n


From ktilton at nyc.rr.com  Sat Jun 18 14:44:57 2005
From: ktilton at nyc.rr.com (Kenny Tilton)
Date: Sat, 18 Jun 2005 10:44:57 -0400
Subject: [cells-devel] Current status of Cello openMCL?
In-Reply-To: <m2ekazenxg.fsf@Cascade.local>
References: <m2ekazenxg.fsf@Cascade.local>
Message-ID: <42B43369.2070301@nyc.rr.com>

Tiarn?n ? Corr?in wrote:

>Hi--
>
>What is the current status of Cello on openMCL/Mac OS X? If there is a
>port , I'd be interested in using it. If no port exists, I'd be
>willing to try to create it.
>
>  
>
Hi, tiarnan.

yes, there is a port of all the core capabilities: opengl, 
GraphicsMagick, FTGL, OpenAL. We happen just now to be swinging back 
into action on Cello. I did a rough merge of the OSX stuff with the 
win32 stuff, and one contributor is planning on trying to get the one 
code base working again under osx and hopefully we will get this all 
sorted out.

I am also starting a new wave of development on Cello, so things should 
be moving along over the summer.

Please note that we are once again working under the Cello (not Cells) 
project under common-lisp.net.


-- 
Kenny

Why Lisp? http://lisp.tech.coop/RtL%20Highlight%20Film

"If you plan to enter text which our system might consider to be obscene, check here to certify that you are old enough to hear the resulting output." -- Bell Labs text-to-speech interactive Web page





From luke at balooga.com  Tue Jun 21 19:07:48 2005
From: luke at balooga.com (Luke Crook)
Date: Tue, 21 Jun 2005 15:07:48 -0400
Subject: [cells-devel] Where's the MOP?
Message-ID: <20050621190748.31982.qmail@vpop1.superb.net>


Kenny, 

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

 -Luke


From ktilton at nyc.rr.com  Tue Jun 21 23:16:44 2005
From: ktilton at nyc.rr.com (ktilton at nyc.rr.com)
Date: Tue, 21 Jun 2005 19:16:44 -0400
Subject: [cells-devel] Where's the MOP?
Message-ID: <3c11e63c2914.3c29143c11e6@rdc-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




From luke at balooga.com  Wed Jun 22 00:56:01 2005
From: luke at balooga.com (Luke Crook)
Date: Tue, 21 Jun 2005 20:56:01 -0400
Subject: [cells-devel] Re: Where's the MOP?
In-Reply-To: <3c11e63c2914.3c29143c11e6@rdc-nyc.rr.com>
References: <3c11e63c2914.3c29143c11e6@rdc-nyc.rr.com>
Message-ID: <20050622005601.29792.qmail@vpop1.superb.net>

ktilton at 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.


From ktilton at nyc.rr.com  Wed Jun 22 15:21:37 2005
From: ktilton at nyc.rr.com (ktilton at nyc.rr.com)
Date: Wed, 22 Jun 2005 11:21:37 -0400
Subject: [cells-devel] Re: Where's the MOP?
Message-ID: <3ef54d3ef0c1.3ef0c13ef54d@rdc-nyc.rr.com>



----- Original Message -----
From: Luke Crook <luke at balooga.com>
Date: Tuesday, June 21, 2005 8:56 pm
Subject: Re: Where's the MOP?

> ktilton at 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)

This...:

(defun (setf md-slot-cell-type) (new-type class-name slot-name)
  (let ((entry (assoc slot-name (get class-name :cell-types))))
    (if entry
        (setf (cdr entry) new-type)
      (push (cons slot-name new-type) (get class-name :cell-types)))))

...is found in model-object.lisp. Possibly there is a missing dependency
in cells.asd. Just make sure whichever file is failing to compile has a
dependency directly ot indirectly on model-object.lisp.

FYI, this happens because I do not use ASDF in my regular work, so the
cells.asd does not get heavy use.

Mind you, I am only guessing. Possibly Corman Lisp has a problem with
(defun (setf ....)). You should check to see if other symbols from
model-object.lisp exist, or its FASL, or in some way determine if
model-object has been both compileed and loaded.

If so, and if the setter still is not acknowledged, there might be a
problem with Corman.

kt