[cells-devel] cells3

Peter Hildebrandt peter.hildebrandt at gmail.com
Sun Jan 27 22:11:39 UTC 2008


I'm trying to get cells3 + Celtk up and running on sbcl/linux, and I 
found three issues:

(i) in utils-kt/core.lisp, defmacro export!:  sbcl does not like the 
export at compile time:
     `(eval-when (#-sbcl :compile-toplevel :load-toplevel :execute)

(ii) in Celtk/run.lisp, defun run-window:
      (CG:kill-splash-screen)
      ---> CG is an unknown package for me.  This is Allegro Common 
Graphics, I assume?  I changed that to #+allegro (CG:...

(iii) in Celtk/tk-interp.lisp, the names do not match the latest tcl/tk. 
  Something with :or would work better:

(define-foreign-library Tcl
     (:darwin (:framework "Tcl"))
   (:windows (:or "Tcl85.dll"))
   (:unix (:or "libtcl.so" "libtcl8.5.so.0" "libtcl8.5.so" 
"libtcl8.4.so.0" "libtcl8.5.so"))
   (t (:default "libtcl")))

(define-foreign-library Tk
     (:darwin (:framework "Tk"))
   (:windows (:or "Tk85.dll"))
   (:unix (:or "libtk.so" "libtk8.5.so.0" "libtk8.5.so" "libtk8.4.so.0" 
"libtk8.4.so"))
   (t (:default "libtk")))

(define-foreign-library Tile
     ;(:darwin (:framework "Tk"))
     (:windows (:or "tile078.dll"))
   (:unix (:or "libtk.so" "libtk8.5.so.0" "libtk8.5.so" "libtk8.4.so.0" 
"libtk8.4.so"))
   (t (:default "libtk")))

HTH someone,

Peter





More information about the cells-devel mailing list