projects
/
cl-gtk2.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(from parent 1:
2eb955f
)
Merge branch 'master' of git://github.com/dmitryvk/cl-gtk2 into gdk-pixbuf
author
Olof-Joachim Frahm
<Olof.Frahm@web.de>
Sat, 25 Sep 2010 23:43:31 +0000
(
01:43
+0200)
committer
Olof-Joachim Frahm
<Olof.Frahm@web.de>
Sat, 25 Sep 2010 23:43:31 +0000
(
01:43
+0200)
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