Peder Chr. Nørgaard 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:[EMAIL PROTECTED]:/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
> 

Hey, Peder.

Thx, I'll try to get these in later.

Good luck with Cells-gtk.

Cheers, ken

-- 
http://www.theoryyalgebra.com/


_______________________________________________
cells-devel site list
cells-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/cells-devel

Reply via email to