guile-gtk-general
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

crash in latest guile-gnome


From: gregory benison
Subject: crash in latest guile-gnome
Date: Mon, 10 Dec 2007 21:02:36 -0800

In guile-gnome 2.15.95 or 2.15.96 (but not 2.15.92) -

If guile was configured with the '--disable-networking' option-

(use-modules (gnome gobject generics))

fails to load because the root module does not contain a binding for 'connect'.

I suggest the following patch -

--- generics.scm.orig   2007-12-10 20:46:51.000000000 -0800
+++ generics.scm        2007-12-10 20:46:25.000000000 -0800
@@ -138,11 +138,14 @@
   "A shorthand for @code{gtype-instance-signal-emit}."
   (apply gtype-instance-signal-emit object name args))

-(define %connect (module-ref the-root-module 'connect))
 (define-generic-with-docs connect "")
-(define-method (connect . args)
-  "The core Guile implementation of the connect(2) POSIX call"
-  (apply %connect args))
+
+(if (module-defined? the-root-module 'connect)
+    (let ((%connect (module-ref the-root-module 'connect)))
+      (define-method (connect . args)
+       "The core Guile implementation of the connect(2) POSIX call"
+       (apply %connect args))))
+
 (define-method (connect (object <gtype-instance>) (name <symbol>)
(func <procedure>))
   "A shorthand for @code{gtype-instance-signal-connect}."
   (gtype-instance-signal-connect object name func))


-- 

======================
Gregory Benison
Oregon State University
(541)-737-1876
gbenison at gmail dot com
======================




reply via email to

[Prev in Thread] Current Thread [Next in Thread]