From 609ddfbcf5dba1726580af49786c2f77b7a99305 Mon Sep 17 00:00:00 2001 From: Dmitry Kalyanov Date: Wed, 15 Sep 2010 02:29:20 +0800 Subject: [PATCH] Since Gtk+-2.18 "helpfully" ignores SIGPIPE in gtk_init, reinstall handler --- gtk/gtk.main_loop_events.lisp | 2 ++ 1 file changed, 2 insertions(+) diff --git a/gtk/gtk.main_loop_events.lisp b/gtk/gtk.main_loop_events.lisp index 244a7d7..909967c 100644 --- a/gtk/gtk.main_loop_events.lisp +++ b/gtk/gtk.main_loop_events.lisp @@ -7,6 +7,8 @@ (defun gtk-init () (gtk-init-check (foreign-alloc :int :initial-element 0) (foreign-alloc :string :initial-contents '("/usr/bin/sbcl"))) + #+sbcl + (sb-unix::enable-interrupt sb-unix:sigpipe #'sb-unix::sigpipe-handler) #+nil(with-foreign-objects ((argc :int) (argv '(:pointer :string) 1)) (setf (mem-ref argc :int) 0 -- 1.7.10.4