problem with last clg : gtk

[email protected] Mon, 8 Jan 2007 14:28:18 +0100 (CET)
Newsgroups gmane.lisp.clg.devel
Message-ID <[email protected]>
i make a cvs update with the last CLG version
my problem comes from when i try to load gtk
(gdk, pango, glib ... are ok) :

CL-USER> (asdf:oos 'asdf:load-op :gtk)
; loading system definition from
; /home/nlamirault/.sbcl/site/clg/systems/gtk.asd into #<PACKAGE "ASDF0">
; registering #<SYSTEM GTK {C495EF9}> as GTK
; loading system definition from
; /home/nlamirault/.sbcl/site/clg/systems/atk.asd into #<PACKAGE "ASDF0">
; registering #<SYSTEM ATK {C637F99}> as ATK

[...]

; compiling (DEFINE-TYPES-BY-INTROSPECTION "Gtk" ...)

; file: /home/nlamirault/.sbcl/site/clg/gtk/gtktypes.lisp
; in: DEFINE-TYPES-BY-INTROSPECTION "Gtk"
;     (GLIB:DEFINE-TYPES-BY-INTROSPECTION "Gtk"
;                                       ("GtkObject" :IGNORE T)
;                                       ("GtkRequisition" :IGNORE T)
;                                       ("GtkBorder" :IGNORE T)
;                                       ("GtkTreeIter" :IGNORE T)
;                                       ("GtkTreePath" :IGNORE T)
;                                       ("GtkWidget" :SLOTS
;                                        ((GTK::CHILD-PROPERTIES :SPECIAL
;                                                                T
;                                                                :ACCESSOR
;                                                               
GTK::WIDGET-CHILD-PROPERTIES
;                                                                :TYPE
;                                                               
GTK:CONTAINER-CHILD)
;                                         (GTK::WINDOW :ALLOCATION
;                                                      :VIRTUAL
;                                                      :GETTER
;                                                     
"gtk_widget_get_window"
;                                                      :READER
;                                                      GTK::WIDGET-WINDOW
;                                                      :TYPE
;                                                      GDK:WINDOW)
;                                         (GTK::PARENT :MERGE T :INITARG NIL)
;                                         (GTK::VISIBLE :MERGE T :INITARG
NIL)
;                                         (GTK::PARENT-WINDOW :ALLOCATION
;                                                             :VIRTUAL
;                                                             :GETTER
;                                                            
GTK::%WIDGET-PARENT-WINDOW
;                                                             :SETTER
;                                                            
"gtk_widget_set_parent_window"
;                                                             :ACCESSOR
;                                                            
GTK::WIDGET-PARENT-WINDOW
;                                                             :INITARG
;                                                             :PARENT-WINDOW
;                                                             :TYPE
;                                                             ...)
;                                         (GTK::STATE :ALLOCATION
;                                                     :VIRTUAL
;                                                     :GETTER
;                                                     "gtk_widget_get_state"
;                                                     :SETTER
;                                                     "gtk_widget_set_state"
;                                                     :ACCESSOR
;                                                     GTK::WIDGET-STATE
;                                                     :INITARG
;                                                     :STATE
;                                                     :TYPE
;                                                     ...)
;                                         (GTK::COLORMAP :ALLOCATION
;                                                        :VIRTUAL
;                                                        :GETTER
;                                                       
"gtk_widget_get_colormap"
;                                                        :SETTER
;                                                       
"gtk_widget_set_colormap"
;                                                        :INITARG
;                                                        :COLORMAP
;                                                        :ACCESSOR
;                                                        GTK::WIDGET-COLORMAP
;                                                        :TYPE
;                                                        ...)
;                                         (GTK::VISUAL :ALLOCATION
;                                                      :VIRTUAL
;                                                      :GETTER
;                                                     
"gtk_widget_get_visual"
;                                                      :READER
;                                                      GTK::WIDGET-VISUAL
;                                                      :TYPE
;                                                      GDK:VISUAL)
;                                         (GTK::DIRECTION :ALLOCATION
;                                                         :VIRTUAL
;                                                         :GETTER
;                                                        
"gtk_widget_get_direction"
;                                                         :SETTER
;                                                        
"gtk_widget_set_direction"
;                                                         :ACCESSOR
;                                                        
GTK::WIDGET-DIRECTION
;                                                         :INITARG
;                                                         :DIRECTION
;                                                         :TYPE
;                                                         ...)
;                                         (GTK::COMPOSITE-NAME :ALLOCATION
;                                                              :VIRTUAL
;                                                              :GETTER
;                                                             
"gtk_widget_get_composite_name"
;                                                              :SETTER
;                                                             
"gtk_widget_set_composite_name"
;                                                              :ACCESSOR
;                                                             
GTK::WIDGET-COMPOSITE-NAME
;                                                              :INITARG
;                                                             
:COMPOSITE-NAME
;                                                              :TYPE
;                                                              ...)
;                                         (GTK::SETTINGS :ALLOCATION
;                                                        :VIRTUAL
;                                                        :GETTER
;                                                       
"gtk_widget_get_settings"
;                                                        :ACCESSOR
;                                                        GTK::WIDGET-SETTINGS
;                                                        :TYPE
;                                                        GTK::SETTINGS)
;                                         (GTK::CHILD-VISIBLE :ALLOCATION
;                                                             :VIRTUAL
;                                                             :GETTER
;                                                            
"gtk_widget_get_child_visible"
;                                                             :SETTER
;                                                            
"gtk_widget_set_child_visible"
;                                                             :ACCESSOR
;                                                            
GTK::WIDGET-CHILD-VISIBLE-P
;                                                             :INITARG
;                                                             :CHILD-VISIBLE
;                                                             :TYPE
;                                                             ...)
;                                         ...))
;                                       ("GtkContainer" :SLOTS
;                                        ((GTK::CHILD :IGNORE T)
;                                         (GTK::CHILDREN :ALLOCATION
;                                                        :VIRTUAL
;                                                        :SETTER
;                                                        (SETF
GTK::CONTAINER-CHILDREN)
;                                                        :GETTER
;                                                       
"gtk_container_get_children"
;                                                        :READER
;                                                       
GTK::CONTAINER-CHILDREN
;                                                        :TYPE
;                                                        (GLIB:GLIST #))
;                                         (GTK::INTERNAL-CHILDREN :ALLOCATION
;                                                                 :VIRTUAL
;                                                                 :GETTER
;                                                                
GTK::CONTAINER-INTERNAL-CHILDREN)
;                                         (GTK::CHILD-TYPE :ALLOCATION
;                                                          :VIRTUAL
;                                                          :GETTER
;                                                         
"gtk_container_child_type"
;                                                          :READER
;                                                         
GTK::CONTAINER-CHILD-TYPE
;                                                          :TYPE
;                                                          GLIB:GTYPE)
;                                         (GTK::FOCUS-CHILD :ALLOCATION
;                                                           :VIRTUAL
;                                                           :GETTER
;                                                          
"gtk_container_get_focus_child"
;                                                           :SETTER
;                                                          
"gtk_container_set_focus_child"
;                                                           :ACCESSOR
;                                                          
GTK::CONTAINER-FOCUS-CHILD
;                                                           :INITARG
;                                                           :FOCUS-CHILD
;                                                           :TYPE
;                                                           ...)
;                                         (GTK::FOCUS-CHAIN :ALLOCATION
;                                                           :VIRTUAL
;                                                           :GETTER
;                                                          
GTK::CONTAINER-FOCUS-CHAIN
;                                                           :SETTER
;                                                           (SETF
GTK::CONTAINER-FOCUS-CHAIN))
;                                         (GTK::FOCUS-HADJUSTMENT :ALLOCATION
;                                                                 :VIRTUAL
;                                                                 :GETTER
;                                                                
"gtk_container_get_focus_hadjustment"
;                                                                 :SETTER
;                                                                
"gtk_container_set_focus_hadjustment"
;                                                                 :ACCESSOR
;                                                                
GTK::CONTAINER-FOCUS-HADJUSTMENT
;                                                                 :INITARG
;                                                                
:FOCUS-HADJUSTMENT
;                                                                 :TYPE
;                                                                 ...)
;                                         (GTK::FOCUS-VADJUSTMENT :ALLOCATION
;                                                                 :VIRTUAL
;                                                                 :GETTER
;                                                                
"gtk_container_get_focus_vadjustment"
;                                                                 :SETTER
;                                                                
"gtk_container_set_focus_vadjustment"
;                                                                 :ACCESSOR
;                                                                
GTK::CONTAINER-FOCUS-VADJUSTMENT
;                                                                 :INITARG
;                                                                
:FOCUS-VADJUSTMENT
;                                                                 :TYPE
;                                                                 ...)
;                                         (GTK::REALLOCATE-REDRAWS
:ALLOCATION
;                                                                  :VIRTUAL
;                                                                  :GETTER
;                                                                 
"gtk_container_get_reallocate_redraws"
;                                                                  :SETTER
;                                                                 
"gtk_container_set_reallocate_redraws"
;                                                                  :ACCESSOR
;                                                                 
GTK::CONTAINER-REALLOCATE-REDRAWS
;                                                                  :INITARG
;                                                                 
:REALLOCATE-REDRAWS
;                                                                  :TYPE
;                                                                  ...)))
;                                       ("GtkBin" :SLOTS
;                                        ((GTK::CHILD :ALLOCATION
;                                                     :VIRTUAL
;                                                     :GETTER
;                                                     "gtk_bin_get_child"
;                                                     :SETTER
;                                                     (SETF GTK::BIN-CHILD)
;                                                     :READER
;                                                     GTK::BIN-CHILD
;                                                     :TYPE
;                                                     GTK::WIDGET)))
;                                       ("GtkWindow" :SLOTS
;                                        ((GTK::FOCUS-WIDGET :ALLOCATION
;                                                            :VIRTUAL
;                                                            :GETTER
;                                                           
"gtk_window_get_focus"
;                                                            :SETTER
;                                                           
"gtk_window_set_focus"
;                                                            :ACCESSOR
;                                                           
GTK::WINDOW-FOCUS-WIDGET
;                                                            :INITARG
;                                                            :FOCUS-WIDGET
;                                                            :TYPE
;                                                            ...)
;                                         (GTK::DEFAULT-WIDGET :ALLOCATION
;                                                              :VIRTUAL
;                                                              :GETTER
;                                                             
"gtk_window_get_default"
;                                                              :SETTER
;                                                             
"gtk_window_set_default"
;                                                              :ACCESSOR
;                                                             
GTK::WINDOW-DEFAULT-WIDGET
;                                                              :INITARG
;                                                             
:DEFAULT-WIDGET
;                                                              :TYPE
;                                                              ...)
;                                         (GTK::HAS-FRAME :ALLOCATION
;                                                         :VIRTUAL
;                                                         :GETTER
;                                                        
"gtk_window_get_has_frame"
;                                                         :SETTER
;                                                        
"gtk_window_set_has_frame"
;                                                         :ACCESSOR
;                                                        
GTK::WINDOW-HAS-FRAME-P
;                                                         :INITARG
;                                                         :HAS-FRAME
;                                                         :TYPE
;                                                         ...)
;                                         (GTK::ICON-LIST :ALLOCATION
;                                                         :VIRTUAL
;                                                         :GETTER
;                                                        
GTK::%WINDOW-GET-ICON-LIST
;                                                         :SETTER
;                                                        
"gtk_window_set_icon_list"
;                                                         :ACCESSOR
;                                                        
GTK::WINDOW-ICON-LIST
;                                                         :INITARG
;                                                         :ICON-LIST
;                                                         :TYPE
;                                                         ...)
;                                         (GTK::MNEMONIC-MODIFIER :ALLOCATION
;                                                                 :VIRTUAL
;                                                                 :GETTER
;                                                                
"gtk_window_get_mnemonic_modifier"
;                                                                 :SETTER
;                                                                
"gtk_window_set_mnemonic_modifier"
;                                                                 :ACCESSOR
;                                                                
GTK::WINDOW-MNEMONIC-MODIFIER
;                                                                 :INITARG
;                                                                
:MNEMONIC-MODIFIER
;                                                                 :TYPE
;                                                                 ...)
;                                         (GTK::TRANSIENT-FOR :ALLOCATION
;                                                             :VIRTUAL
;                                                             :GETTER
;                                                            
"gtk_window_get_transient_for"
;                                                             :SETTER
;                                                            
"gtk_window_set_transient_for"
;                                                             :ACCESSOR
;                                                            
GTK::WINDOW-TRANSIENT-FOR
;                                                             :INITARG
;                                                             :TRANSIENT-FOR
;                                                             :TYPE
;                                                             ...)
;                                         (GTK::GROUP :ALLOCATION
;                                                     :VIRTUAL
;                                                     :GETTER
;                                                     "gtk_window_get_group"
;                                                     :SETTER
;                                                     (SETF
GTK::WINDOW-GROUP)
;                                                     :READER
;                                                     GTK::WINDOW-GROUP
;                                                     :INITARG
;                                                     :GROUP
;                                                     :TYPE
;                                                     ...)
;                                         (GTK::DEFAULT-WIDTH :MERGE
;                                                             T
;                                                             :UNBOUND
;                                                             -1)
;                                         (GTK::DEFAULT-HEIGHT :MERGE
;                                                              T
;                                                              :UNBOUND
;                                                              -1)))
;                                       ("GtkWindowGroup" :DEPENDENCIES
;                                        (GTK::WINDOW) :SLOTS
;                                        ((GTK::GRABS :ALLOCATION
;                                                     :ALIEN
;                                                     :ACCESSOR
;                                                     GTK::WINDOW-GROUP-GRABS
;                                                     :TYPE
;                                                     (GLIB:GSLIST
;                                                      GTK::WINDOW))))
;                                       ...)
;
; caught ERROR:
;   (during macroexpansion of (DEFINE-TYPES-BY-INTROSPECTION "Gtk" ...))
;   The value 1239392 is not of type (MOD 1114112).

; compiling (DEFCLASS TEXT-ITER ...)
; compiling (DEFCLASS TOOLTIPS-DATA ...)
; compiling (DEFCLASS FILE-FILTER-INFO ...)
; compiling (DEFCLASS ACCEL-KEY ...)
; compiling (DEFCLASS ACCEL-GROUP-ENTRY ...)
; compiling (DEFINE-ENUM-TYPE DROP-POSITION ...)
; compiling (DEFCLASS TARGET-ENTRY ...)
; compiling (DEFCLASS SELECTION-DATA ...)
; compiling (DEFCLASS TARGET-LIST ...)

;
/var/cache/common-lisp-controller/1000/sbcl/local/home/nlamirault/.sbcl/site/clg/gtk/gtktypes.fasl
written
; compilation finished in 0:00:01
WARNING:
   COMPILE-FILE warned while performing #<COMPILE-OP NIL {A930679}> on
   #<CL-SOURCE-FILE "gtktypes" {B60B6F9}>.
;
; compilation unit aborted
;   caught 1 fatal ERROR condition
;   caught 1 ERROR condition
; Evaluation aborted



Any idea ?
i use sbcl 0.9.14.0-2 on ubuntu edgy


thanks for any help.


-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys - and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV