Eric Marsden <[EMAIL PROTECTED]> writes:

>   it is possible that libcellsgtk.so depends on some other library,

Here are the dependencies of libcellsgtk.so:

[EMAIL PROTECTED]:~/src/cells-gtk-2005-05-29/root/gtk-ffi$ ldd libcellsgtk.so
        libc.so.6 => /lib/libc.so.6 (0x40019000)
        /lib/ld-linux.so.2 => /lib/ld-linux.so.2 (0x80000000)


>   a shared library by using ldd). It is possible that the GTk
>   libraries on your system have been built incorrectly, without all
>   the required dependency information.

Here are the build options from the Makefile:

all:
        gcc -c gtk-adds.c `pkg-config --cflags --libs gtk+-2.0`
        gcc -shared -o libcellsgtk.so gtk-adds.o


>   If you can reproduce the problem with a sequence of calls to
>   EXT:LOAD-FOREIGN, I can try it on my machine.

I will look into this.


>   BTW, there is now a CMUCL function SYS::REINITIALIZE-GLOBAL-TABLE
>   that you can call instead of RELOAD-GLOBAL-TABLE.

Here is what I get:

* (pushnew 'sys::reinitialize-global-table ext:*after-save-initializations*)

(SYSTEM::REINITIALIZE-GLOBAL-TABLE NEW-ASSEM::FORGET-OUTPUT-BLOCKS
                                   MULTIPROCESSING::INIT-MULTI-PROCESSING
                                   LISP::PACKAGE-LOCKS-INIT
                                   KERNEL::RAND-MT19937-INITIALIZER
                                   ALIEN::RESTORE-CALLBACKS)
* (save-lisp "cells-gtk-demo.core" :init-function #'test-gtk::gtk-demo)
[Doing purification: Done.]
[Undoing binding stack... done]
[Saving current lisp image into cells-gtk-demo.core:
Writing 25374040 bytes from the Read-Only space at 0x10000000.
Writing 5792696 bytes from the Static space at 0x28000000.
Writing 4096 bytes from the Dynamic space at 0x58000000.
done.]
[EMAIL PROTECTED]:~/src/cells-gtk-2005-05-29$ cmucl -core cells-gtk-demo.core
; Loading #P"/home/paolo/.cmucl-init.lisp".
CMU Common Lisp 19b (19B), running on plato
With core: /home/paolo/src/cells-gtk-2005-05-29/cells-gtk-demo.core
Dumped on: Thu, 2005-07-14 13:53:09+02:00 on plato
See <http://www.cons.org/cmucl/> for support information.
Loaded subsystems:
    Python 1.1, target Intel x86
    CLOS based on Gerd's PCL 2004/04/14 03:32:47

(<unknown>:4805): Gtk-CRITICAL **: file gtkbox.c: line 374 
(gtk_box_pack_start): assertion `child->parent == NULL' failed

(<unknown>:4805): Gtk-CRITICAL **: file gtkbox.c: line 374 
(gtk_box_pack_start): assertion `child->parent == NULL' failed

(<unknown>:4805): Gtk-WARNING **: Attempting to add a widget with type 
GtkAccelLabel to a GtkImageMenuItem, but as a GtkBin subclass a 
GtkImageMenuItem can only contain one widget at a time; it already contains a 
widget of type GtkAccelLabel


Error in function UNIX::SIGSEGV-HANDLER:  Segmentation Violation at #x8074754.
   [Condition of type SIMPLE-ERROR]


Debug  (type H for help)

(UNIX::SIGSEGV-HANDLER #<unused-arg>
                       #<unused-arg>
                       #.(SYSTEM:INT-SAP #x3FFFC48C))
Source: Error finding source:
Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM:  Source file no longer exists:
  target:code/signal.lisp.
0] backtrace

0: (UNIX::SIGSEGV-HANDLER #<unused-arg>
                          #<unused-arg>
                          #.(SYSTEM:INT-SAP #x3FFFC48C))
1: (UNIX::SIGSEGV-HANDLER 3
                          #<unused-arg>
                          #<unused-arg>
                          #.(SYSTEM:INT-SAP #x3FFFC48C))[:EXTERNAL]
2: ("call_into_lisp+#x8C [#x8054A1C] cmucl")
3: ("funcall3+#x29 [#x805482C] cmucl")
4: ("interrupt_handle_now+#xEE [#x80504ED] cmucl")
5: ("NIL+#x8055053 [#x8055053] cmucl")
6: ("NIL+#x805508B [#x805508B] cmucl")
7: ("g_cclosure_marshal_VOID__VOID+#xA1 [#x403237B1] 
/usr/lib/libgobject-2.0.so")
8: ("g_closure_invoke+#xB0 [#x4030F2C0] /usr/lib/libgobject-2.0.so")
9: ("NIL+#x40323145 [#x40323145] /usr/lib/libgobject-2.0.so")
10: ("g_signal_emit_valist+#x737 [#x403222A7] /usr/lib/libgobject-2.0.so")
11: ("g_signal_emit+#x34 [#x403225A4] /usr/lib/libgobject-2.0.so")
12: ("gtk_toggle_button_toggled+#x55 [#x408B97E5] /usr/lib/libgtk-x11-2.0.so")
13: ("NIL+#x408B9B92 [#x408B9B92] /usr/lib/libgtk-x11-2.0.so")
14: ("g_cclosure_marshal_VOID__VOID+#xA1 [#x403237B1] 
/usr/lib/libgobject-2.0.so")
15: ("NIL+#x4030F657 [#x4030F657] /usr/lib/libgobject-2.0.so")
16: ("g_closure_invoke+#xB0 [#x4030F2C0] /usr/lib/libgobject-2.0.so")
17: ("NIL+#x40322B0E [#x40322B0E] /usr/lib/libgobject-2.0.so")
18: ("g_signal_emit_valist+#x737 [#x403222A7] /usr/lib/libgobject-2.0.so")
19: ("g_signal_emit+#x34 [#x403225A4] /usr/lib/libgobject-2.0.so")
20: ("gtk_button_clicked+#x55 [#x407549E5] /usr/lib/libgtk-x11-2.0.so")
21: ("gtk_toggle_button_set_active+#x5E [#x408B968E] 
/usr/lib/libgtk-x11-2.0.so")
22: (GTK-FFI::GTK_TOGGLE_BUTTON_SET_ACTIVE #<Alien (* T) at #x080EB7F0> 1)
23: (GTK-FFI:GTK-TOGGLE-BUTTON-SET-ACTIVE #<Alien (* T) at #x080EB7F0> T)
24: ("LAMBDA (G3332 G3333)" #<unused-arg> #<unused-arg> CELLS-GTK:ACTIVE COOL
     ...)
25: ("DEFUN C-OUTPUT-SLOT")
26: (CELLS::FINISH-BUSINESS)
27: (CELLS::CALL-WITH-INTEGRITY #<unused-arg>
                                (:OUTPUT NIL)
                                #<Closure Over Function "DEFUN C-OUTPUT-SLOT"
                                  {58866669}>)
28: ((METHOD CELLS:MD-AWAKEN NIL (CELLS::MODEL-OBJECT)) (#(0 0) . #())
     #<unused-arg> TEST-GTK)
29: (CELLS:TO-BE TEST-GTK)
30: (CELLS-GTK:START-APP TEST-GTK::TEST-GTK :DEBUG NIL)
31: ((LABELS LISP::RESTART-LISP
       SAVE-LISP))

0]

Thanks,


Paolo
-- 
Lisp Propulsion Laboratory log - http://www.paoloamoroso.it/log


Reply via email to