[cells-devel] A few patches for making cells (3.0 from cvs) run on debian unstable using sbcl.

[Frank Goenninger]

Hi -

try this one:

http://github.com/Ramarren/cells

Cheers
   Frank

Am 13.12.2009 um 20:54 schrieb Francisco Vides Fernández:

> Hi
>
> I've just installed cells for evaluation purposes, and been bitten  
> for this
> very same problem.
>
> Maybe some nice comittin'?
>
> Thanks for this interesting project!
>
> Peder Chr. =?iso-8859-1?q?N=F8rgaard?= wrote:
>
>> Hello cells-devel list.
>> I am investigating cells and cells-gtk3 for a project that I am  
>> planning.
>> For a starter, I needed to get the software running on my Debian  
>> unstable
>> system.  It needed a few patches that you may wish to take into your
>> development.
>>
>> The version of cells that I use is taken with
>>
>> cvs -z3 -d
>> :pserver:anonymous:anonymous at common-lisp.net:/project/cells/cvsroot  
>> co
>> cells
>>
>> That is the most actual one, yes?
>>
>> Well, the sbcl on Debian unstable (1.0.18) does not have nor need  
>> the EXCL
>> package. So it must be configured out:
>>
>> diff -u -r cells/defpackage.lisp cl/cells/defpackage.lisp
>> --- cells/defpackage.lisp	2008-10-12 03:21:07.000000000 +0200
>> +++ MDM/cl/cells/defpackage.lisp	2008-11-28 20:08:38.000000000 +0100
>> @@ -23,7 +23,7 @@
>> (in-package :common-lisp-user)
>>
>> (defpackage :cells
>> -  (:use #:common-lisp #:excl #:utils-kt)
>> +  (:use #:common-lisp #-sbcl #:excl #:utils-kt)
>>   (:import-from
>>    ;; MOP
>>    #+allegro #:excl
>> diff -u -r cells/utils-kt/defpackage.lisp
>> cl/cells/utils-kt/defpackage.lisp
>> --- cells/utils-kt/defpackage.lisp	2008-10-12 03:21:10.000000000  
>> +0200
>> +++ MDM/cl/cells/utils-kt/defpackage.lisp	2008-11-28  
>> 20:04:08.000000000
>> +0100 @@ -35,7 +35,8 @@
>>
>> (defpackage :utils-kt
>>   (:nicknames #:ukt)
>> -  (:use #:common-lisp #:excl
>> +  (:use #:common-lisp
>> +    #-sbcl #:excl
>>     #+(or allegro lispworks clisp) #:clos
>>     #+cmu  #:mop
>>     #+sbcl #:sb-mop
>>
>>
>> The sbcl does not have the MOP package - it is called SB-MOP.  Much  
>> of the
>> code knows that already, but I had to patch one file:
>>
>>
>> diff -u -r cells/utils-kt/detritus.lisp cl/cells/utils-kt/ 
>> detritus.lisp
>> --- cells/utils-kt/detritus.lisp	2008-10-12 03:21:10.000000000 +0200
>> +++ MDM/cl/cells/utils-kt/detritus.lisp	2008-11-28 20:07:57.000000000
>> +0100 @@ -33,7 +33,7 @@
>>   (let ((cc (find-class c)))
>>     (when cc
>>       (finalize-inheritance cc))
>> -    (mop::class-prototype cc)))
>> +    (#+sbcl sb-mop:class-prototype #-sbcl mop::class-prototype cc)))
>>
>>
>> (defun brk (&rest args)
>>
>>
>> After that, I tried to run the test suite.  Worked fine, except that
>> it is a little bit too Window'ish.  I did this:
>>
>> diff -u -r cells/cells-test/test.lisp cl/cells/cells-test/test.lisp
>> --- cells/cells-test/test.lisp	2008-10-12 03:21:09.000000000 +0200
>> +++ MDM/cl/cells/cells-test/test.lisp	2008-12-01 22:25:26.000000000  
>> +0100
>> @@ -69,7 +69,7 @@
>>
>>
>> (defun test-cells ()
>> -  (dribble "c:/0algebra/cells-test.txt")
>> +  (dribble "/tmp/cells-test.txt")
>>   (progn ;prof:with-profiling (:type :time)
>>     (time
>>      (progn
>>
>> but that is not what you want to go in the main sources. Maybe  
>> something
>> based on the features - (dribble #+unix "/tmp/cells-test.txt" #-unix
>> "c:/0algebra/cells-test.txt") - or perhaps just a file name  
>> parameter to
>> TEST-CELLS with the above as the default value?
>>
>> Hope this is of a little help to you.  I am sure to come back for
>> assistance for my project later.
>>
>> best regards
>>
>
> -- 
> +-----------------
> | Francisco Vides Fernández <fvides at dedaloingenieros.com>
> | Director técnico.
> | Dédalo Ingenieros http://www.dedaloingenieros.com/
> | PGP: http://pgp.rediris.es:11371/pks/lookup?op=index&search=0xB1299C15
> +------
>
>
> _______________________________________________
> cells-devel site list
> cells-devel at common-lisp.net
> http://common-lisp.net/mailman/listinfo/cells-devel