projects
/
cl-gtk2.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
4cc1da4
)
Since Gtk+-2.18 "helpfully" ignores SIGPIPE in gtk_init, reinstall handler
author
Dmitry Kalyanov
<Kalyanov.Dmitry@gmail.com>
Tue, 14 Sep 2010 18:29:20 +0000
(
02:29
+0800)
committer
Andrey Kutejko
<andy128k@gmail.com>
Mon, 27 Sep 2010 07:23:54 +0000
(15:23 +0800)
gtk/gtk.main_loop_events.lisp
patch
|
blob
|
history
diff --git
a/gtk/gtk.main_loop_events.lisp
b/gtk/gtk.main_loop_events.lisp
index
244a7d7
..
909967c
100644
(file)
--- 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