[cells-gtk-devel] Cells-gtk install trouble

Draggor draggor at gmail.com
Fri Jul 20 21:17:28 UTC 2007


I've tried installing cells-gtk, but I get the following error:

;;  Loading file E:\PortableApps\clisp-2.38\cells-gtk-2006-06-30\root\gtk-ffi\gt
k-ffi.fas ...
*** - READ: input stream
       #<INPUT BUFFERED FILE-STREAM CHARACTER
         #P"E:\\PortableApps\\clisp-2.38\\cells-gtk-2006-06-30\\root\\gtk-ffi\\g
tk-ffi.fas"
         @143>
      ends within a token after multiple escape character
The following restarts are available:
RETRY          :R1
Retry performing #<ASDF:LOAD-OP NIL #x19F2DAE9> on #<ASDF:CL-SOURCE-FILE
  "gtk-ffi" #x19F2CF0D>.
ACCEPT         :R2
Continue, treating #<ASDF:LOAD-OP NIL #x19F2DAE9> on #<ASDF:CL-SOURCE-FILE
  "gtk-ffi" #x19F2CF0D> as having been successful.
SKIP           :R3      skip (LET # # ...)
STOP           :R4      stop loading file E:\PortableApps\clisp-2.38\cells-gtk-2
006-06-30\load.lisp
ABORT          :R5      ABORT

I can't send attachments at the moment, so here's the file it's trying
to read, and if you look at the very end, it looks like there's either
stuff left off, a line added, or just parenthesis missing.

gtk-ffi.fas

(|SYSTEM|::|VERSION| '(20050505.))
#0Y |CHARSET|::|UTF-8|
#Y(#:|1 19 (IN-PACKAGE :GTK-FFI)-1|
   #17Y(00 00 00 00 00 00 00 00 00 01 DA 31 E6 0F 01 19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|) "GTK-FFI"
   |COMMON-LISP|::|*PACKAGE*|)
#Y(#:|21 52 (DEFCONSTANT +C-NULL+ (IF # # ...))-2|
   #46Y(00 00 00 00 00 00 00 00 00 01 DA 8C 4F 1B 2E 01 14 DA 38 01 8D 5E 0B AC
        DA 71 4E 8E 03 04 DA DC 30 03 DA AD 32 84 C5 19 02 DA 31 4E 1B 62)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   |GTK-FFI|::|+C-NULL+| |CFFI-SYS|::|NULL-POINTER|
   (|COMMON-LISP|::|DEFCONSTANT| |GTK-FFI|::|+C-NULL+|
    (|COMMON-LISP|::|IF| (|COMMON-LISP|::|BOUNDP| '|GTK-FFI|::|+C-NULL+|)
     (|COMMON-LISP|::|SYMBOL-VALUE| '|GTK-FFI|::|+C-NULL+|)
     (|CFFI-SYS|::|NULL-POINTER|)))
   |SYSTEM|::|CONSTANT-WARNING|)
#Y(#:|54 54 (DEFVAR *GTK-DEBUG* NIL)-3|
   #24Y(00 00 00 00 00 00 00 00 00 01 DA 31 5A DB 8C 4F 04 DB 63 31 52 C6 19
        01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   (|COMMON-LISP|::|SPECIAL| |GTK-FFI|::|*GTK-DEBUG*|)
   |GTK-FFI|::|*GTK-DEBUG*|)
#Y(#:|56 57 (CFFI:DEFCTYPE :GTK-STRING :POINTER ...)-4|
   #26Y(00 00 00 00 00 00 00 00 00 01 DA DB DC DD DE 6F 05 E0 64 6E 07 07 2F 08
        19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   |CFFI|::|FOREIGN-TYPEDEF| :|NAME| :|GTK-STRING| :|ACTUAL-TYPE| :|POINTER|
   |CFFI|::|PARSE-TYPE| :|TRANSLATE-P| |CLOS|::|MAKE-INSTANCE|
   |CFFI|::|NOTICE-FOREIGN-TYPE|)
#Y(#:|58 58 (CFFI:DEFCTYPE :GTK-BOOLEAN :POINTER ...)-5|
   #26Y(00 00 00 00 00 00 00 00 00 01 DA DB DC DD DE 6F 05 E0 64 6E 07 07 2F 08
        19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   |CFFI|::|FOREIGN-TYPEDEF| :|NAME| :|GTK-BOOLEAN| :|ACTUAL-TYPE| :|POINTER|
   |CFFI|::|PARSE-TYPE| :|TRANSLATE-P| |CLOS|::|MAKE-INSTANCE|
   |CFFI|::|NOTICE-FOREIGN-TYPE|)
#Y(#:|60 61 (DEFMETHOD CFFI:TRANSLATE-TO-FOREIGN (VALUE #) ...)-6|
   #46Y(00 00 00 00 00 00 00 00 00 01 DA DB 38 01 8F 85 03 DA 2F 02 DA DD DE 63
        DF E0 E1 E2 E3 64 38 02 72 2A E4 6F 0B 7B 02 7B 08 2D 03 0C 19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   |CFFI|::|TRANSLATE-TO-FOREIGN| |SYSTEM|::|TRACED-DEFINITION|
   |SYSTEM|::|UNTRACE1|
   #Y(#:|60 61 (DEFMETHOD CFFI:TRANSLATE-TO-FOREIGN (VALUE #) ...)-6-1|
      #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      (|COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|)
      #Y(#:|60 61 (DEFMETHOD CFFI:TRANSLATE-TO-FOREIGN (VALUE #) ...)-6-1-1|
         #22Y(00 00 00 00 02 00 00 00 00 03 92 02 06 C6 14 2F 02 19 03 C5 1B
              78)
         (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|) 1. 0.
         |CFFI-SYS|::|MAKE-POINTER|)
      (|COMMON-LISP|::|T|))
   :|QUALIFIERS| :|LAMBDA-LIST| (|GTK-FFI|::|VALUE| |COMMON-LISP|::|TYPE|)
   |CLOS|::|SIGNATURE|
   #(2. 0. |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|
     |COMMON-LISP|::|NIL|)
   :|SPECIALIZERS| :|GTK-BOOLEAN| |CLOS|::|INTERN-EQL-SPECIALIZER|
   |CLOS|::|DO-DEFMETHOD|)
#Y(#:|63 67 (DEFMETHOD CFFI:TRANSLATE-FROM-FOREIGN (VALUE #) ...)-7|
   #46Y(00 00 00 00 00 00 00 00 00 01 DA DB 38 01 8F 85 03 DA 2F 02 DA DD DE 63
        DF E0 E1 E2 E3 64 38 02 72 2A E4 6F 0B 7B 02 7B 08 2D 03 0C 19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   |CFFI|::|TRANSLATE-FROM-FOREIGN| |SYSTEM|::|TRACED-DEFINITION|
   |SYSTEM|::|UNTRACE1|
   #Y(#:|63 67 (DEFMETHOD CFFI:TRANSLATE-FROM-FOREIGN (VALUE #) ...)-7-1|
      #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      (|COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|)
      #Y(#:|63 67 (DEFMETHOD CFFI:TRANSLATE-FROM-FOREIGN (VALUE #) ...)-7-1-1|
         #24Y(00 00 00 00 02 00 00 00 00 03 93 02 08 AE 6F 00 32 92 59 19 03 00
              19 03)
         (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
         |CFFI-SYS|::|POINTER-ADDRESS|)
      (|COMMON-LISP|::|T|))
   :|QUALIFIERS| :|LAMBDA-LIST| (|GTK-FFI|::|VALUE| |COMMON-LISP|::|TYPE|)
   |CLOS|::|SIGNATURE|
   #(2. 0. |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|
     |COMMON-LISP|::|NIL|)
   :|SPECIALIZERS| :|GTK-BOOLEAN| |CLOS|::|INTERN-EQL-SPECIALIZER|
   |CLOS|::|DO-DEFMETHOD|)
#Y(#:|69 71 (DEFMETHOD CFFI:TRANSLATE-TO-FOREIGN (VALUE #) ...)-8|
   #46Y(00 00 00 00 00 00 00 00 00 01 DA DB 38 01 8F 85 03 DA 2F 02 DA DD DE 63
        DF E0 E1 E2 E3 64 38 02 72 2A E4 6F 0B 7B 02 7B 08 2D 03 0C 19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   |CFFI|::|TRANSLATE-TO-FOREIGN| |SYSTEM|::|TRACED-DEFINITION|
   |SYSTEM|::|UNTRACE1|
   #Y(#:|69 71 (DEFMETHOD CFFI:TRANSLATE-TO-FOREIGN (VALUE #) ...)-8-1|
      #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      (|COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|)
      #Y(#:|69 71 (DEFMETHOD CFFI:TRANSLATE-TO-FOREIGN (VALUE #) ...)-8-1-1|
         #21Y(00 00 00 00 02 00 00 00 00 03 AE 92 00 02 C5 F8 AC 2F 01 19 04)
         (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|) ""
         |CFFI|::|FOREIGN-STRING-ALLOC|)
      (|COMMON-LISP|::|T|))
   :|QUALIFIERS| :|LAMBDA-LIST| (|GTK-FFI|::|VALUE| |COMMON-LISP|::|TYPE|)
   |CLOS|::|SIGNATURE|
   #(2. 0. |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|
     |COMMON-LISP|::|NIL|)
   :|SPECIALIZERS| :|GTK-STRING| |CLOS|::|INTERN-EQL-SPECIALIZER|
   |CLOS|::|DO-DEFMETHOD|)
#Y(#:|73 74 (DEFMETHOD CFFI:TRANSLATE-FROM-FOREIGN (VALUE #) ...)-9|
   #46Y(00 00 00 00 00 00 00 00 00 01 DA DB 38 01 8F 85 03 DA 2F 02 DA DD DE 63
        DF E0 E1 E2 E3 64 38 02 72 2A E4 6F 0B 7B 02 7B 08 2D 03 0C 19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   |CFFI|::|TRANSLATE-FROM-FOREIGN| |SYSTEM|::|TRACED-DEFINITION|
   |SYSTEM|::|UNTRACE1|
   #Y(#:|73 74 (DEFMETHOD CFFI:TRANSLATE-FROM-FOREIGN (VALUE #) ...)-9-1|
      #15Y(00 00 00 00 01 00 00 00 00 02 DA C6 5D 19 02)
      (|COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|)
      #Y(#:|73 74 (DEFMETHOD CFFI:TRANSLATE-FROM-FOREIGN (VALUE #) ...)-9-1-1|
         #15Y(00 00 00 00 02 00 00 00 00 03 AE 2F 00 19 03)
         (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
         |CFFI|::|FOREIGN-STRING-TO-LISP|)
      (|COMMON-LISP|::|T|))
   :|QUALIFIERS| :|LAMBDA-LIST| (|GTK-FFI|::|VALUE| |COMMON-LISP|::|TYPE|)
   |CLOS|::|SIGNATURE|
   #(2. 0. |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|
     |COMMON-LISP|::|NIL|)
   :|SPECIALIZERS| :|GTK-STRING| |CLOS|::|INTERN-EQL-SPECIALIZER|
   |CLOS|::|DO-DEFMETHOD|)
#Y(#:|76 78 (DEFUN INT-SLOT-INDEXED (OBJ OBJ-TYPE SLOT ...) ...)-10|
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 83 C5 19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   |GTK-FFI|::|INT-SLOT-INDEXED| |SYSTEM|::|REMOVE-OLD-DEFINITIONS|
   #Y(|GTK-FFI|::|INT-SLOT-INDEXED|
      #28Y(00 00 00 00 04 00 00 00 00 05 B0 B0 B0 6E 03 00 DB DC B0 73 02 37 2D
           03 03 3F 19 05)
      (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
      |CFFI|::|FOREIGN-SLOT-VALUE| |FFI|::|INT| 4. |FFI|::|MEMORY-AS|))
#Y(#:|80 83 (DEFUN (SETF INT-SLOT-INDEXED) (NEW-VALUE OBJ OBJ-TYPE ...) ...)-11|
   #20Y(00 00 00 00 00 00 00 00 00 01 DA 2F 01 DA DC 32 83 C8 19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   #.(|SYSTEM|::|GET-SETF-SYMBOL| '|GTK-FFI|::|INT-SLOT-INDEXED|)
   |SYSTEM|::|REMOVE-OLD-DEFINITIONS|
   #Y(#1=(|COMMON-LISP|::|SETF| |GTK-FFI|::|INT-SLOT-INDEXED|)
      #29Y(00 00 00 00 05 00 00 00 00 06 B1 B1 B1 B1 6E 03 00 DB DC B1 73 02 37
           2D 04 03 A2 19 06)
      (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
      |CFFI|::|FOREIGN-SLOT-VALUE| |FFI|::|INT| 4. |FFI|::|WRITE-MEMORY-AS|)
   #1#)
#Y(#:|85 116 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE)
(CFFI:DEFINE-FOREIGN-LIBRARY :GOBJECT # ...) ...)-12-1-1|
   #17Y(00 00 00 00 00 00 00 00 00 01 DA DB 30 02 3E 19 01)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
   ((|CFFI-FEATURES|::|UNIX| "libgobject-2.0.so")
    (|CFF



More information about the cells-gtk-devel mailing list