[cells-gtk-devel] CMUCL sigsegv when starting saved cells-gtk image

Paolo Amoroso amoroso at mclink.it
Sun Jul 10 13:20:24 UTC 2005


I am trying to run a dumped image containing a cells-gtk application,
more specifically gtk-demo.  When I start the dumped image, I get an
error just after the splash screen.

I include a transcript below.  I am trying to understand whether the
problem is related to CMUCL or cells-gtk.  I have posted this same
query also to the cmucl-help list, but I haven't received any feedback
yet.

Since cells-gtk provides GTK bindings, before saving the Lisp image I
load the reload-global-table function by Eric Marsden:

  http://www.mail-archive.com/cmucl-help@cons.org/msg01289.html  

I am using cells-gtk 2005-05-29 and CMUCL 19b under Slackware Linux
10.0.


Paolo

--------------------------------------------------------------------
paolo at plato:~/src/cells-gtk-2005-05-29$ cmucl
; Loading #P"/home/paolo/.cmucl-init.lisp".
CMU Common Lisp 19b (19B), running on plato
With core: /usr/local/cmucl-19b/lib/cmucl/lib/lisp.core
Dumped on: Tue, 2005-06-28 02:09:58+02:00 on lorien
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
* (load "load")

; Loading #P"/home/paolo/src/cells-gtk-2005-05-29/load.lisp".

;;; More loading...

 Done! Now try (test-gtk::gtk-demo)
T
* (load "reload-global-table")

; Loading #P"/home/paolo/src/cells-gtk-2005-05-29/reload-global-table.x86f".
T
* sys::*global-table*

((#.(SYSTEM:INT-SAP #x08073B60) . "/usr/lib/libgtk-x11-2.0.so")
 (#.(SYSTEM:INT-SAP #x08070300) . "/usr/lib/libgdk-x11-2.0.so")
 (#.(SYSTEM:INT-SAP #x0806FBC8) . "/usr/lib/libgthread-2.0.so")
 (#.(SYSTEM:INT-SAP #x0806F7B0) . "/usr/lib/libglib-2.0.so")
 (#.(SYSTEM:INT-SAP #x0806F570) . "/usr/lib/libgobject-2.0.so")
 (#.(SYSTEM:INT-SAP #x40014F90)))
* (pushnew 'reload-global-table ext:*after-save-initializations*)

(RELOAD-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 25368120 bytes from the Read-Only space at 0x10000000.
Writing 5791368 bytes from the Static space at 0x28000000.
Writing 4096 bytes from the Dynamic space at 0x58000000.
done.]
paolo at plato:~/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: Sat, 2005-07-09 11:41:01+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

;;; The Gtk-CRITICALs are harmless and are displayed also when the
;;; application works fine

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

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

(<unknown>:4832): 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 #x1145B958.
   [Condition of type SIMPLE-ERROR]


Debug  (type H for help)

(UNIX::SIGSEGV-HANDLER #<unused-arg>
                       #<unused-arg>
                       #.(SYSTEM:INT-SAP #x3FFFC388))
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 #x3FFFC388))
1: (UNIX::SIGSEGV-HANDLER 3
                          #<unused-arg>
                          #<unused-arg>
                          #.(SYSTEM:INT-SAP #x3FFFC388))[: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: (CELLS-GTK::TREE-VIEW-RENDER-CELL-CALLBACK 4 0)
8: ("call_into_lisp+#x8C [#x8054A1C] cmucl")
9: ("funcall3+#x29 [#x805482C] cmucl")
10: ("Foreign function call land")
11: ("g_closure_invoke+#xB0 [#x407982C0] /usr/lib/libgobject-2.0.so.0")
12: ("NIL+#x407AC145 [#x407AC145] /usr/lib/libgobject-2.0.so.0")
13: ("g_signal_emit_valist+#x737 [#x407AB2A7] /usr/lib/libgobject-2.0.so.0")
14: ("g_signal_emit+#x34 [#x407AB5A4] /usr/lib/libgobject-2.0.so.0")
15: ("gtk_toggle_button_toggled+#x55 [#x404C07E5] /usr/lib/libgtk-x11-2.0.so")
16: ("NIL+#x404C0B92 [#x404C0B92] /usr/lib/libgtk-x11-2.0.so")
17: ("g_cclosure_marshal_VOID__VOID+#xA1 [#x407AC7B1] /usr/lib/libgobject-2.0.so.0")
18: ("NIL+#x40798657 [#x40798657] /usr/lib/libgobject-2.0.so.0")
19: ("g_closure_invoke+#xB0 [#x407982C0] /usr/lib/libgobject-2.0.so.0")
20: ("NIL+#x407ABB0E [#x407ABB0E] /usr/lib/libgobject-2.0.so.0")
21: ("g_signal_emit_valist+#x737 [#x407AB2A7] /usr/lib/libgobject-2.0.so.0")
22: ("g_signal_emit+#x34 [#x407AB5A4] /usr/lib/libgobject-2.0.so.0")
23: ("gtk_button_clicked+#x55 [#x4035B9E5] /usr/lib/libgtk-x11-2.0.so")
24: ("gtk_toggle_button_set_active+#x5E [#x404C068E] /usr/lib/libgtk-x11-2.0.so")
25: (GTK-FFI::GTK_TOGGLE_BUTTON_SET_ACTIVE #<Alien (* T) at #x080EB4B8> 1)
26: (GTK-FFI:GTK-TOGGLE-BUTTON-SET-ACTIVE #<Alien (* T) at #x080EB4B8> T)
27: ("LAMBDA (G3332 G3333)" #<unused-arg> #<unused-arg> CELLS-GTK:ACTIVE COOL
     ...)
28: ("DEFUN C-OUTPUT-SLOT")
29: (CELLS::FINISH-BUSINESS)
30: (CELLS::CALL-WITH-INTEGRITY #<unused-arg>
                                (:OUTPUT NIL)
                                #<Closure Over Function "DEFUN C-OUTPUT-SLOT"
                                  {5885BEC1}>)
31: ((METHOD CELLS:MD-AWAKEN NIL (CELLS::MODEL-OBJECT)) (#(0 0) . #())
     #<unused-arg> TEST-GTK)
32: (CELLS:TO-BE TEST-GTK)
33: (CELLS-GTK:START-APP TEST-GTK::TEST-GTK :DEBUG NIL)
34: ((LABELS LISP::RESTART-LISP
       SAVE-LISP))

0]
--------------------------------------------------------------------


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



More information about the cells-gtk-devel mailing list