steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

awaken-event-loop does nothing if dpy-fd not set; move x11.unix to x11.io.unix

db4
Slava Pestov 2009-04-18 02:54:34 -05:00
parent 5579842d7a
commit 427710427c
3 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

0
basis/x11/unix/authors.txt → basis/x11/io/unix/authors.txt
View File

6
basis/x11/unix/unix.factor → basis/x11/io/unix/unix.factor
View File

@ -2,8 +2,8 @@
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: io.backend.unix io.backend.unix.multiplexers USING: io.backend.unix io.backend.unix.multiplexers
namespaces system x11 x11.xlib x11.io namespaces system x11 x11.xlib x11.io
accessors threads sequences ; accessors threads sequences kernel ;
IN: x11.unix IN: x11.io.unix
SYMBOL: dpy-fd SYMBOL: dpy-fd
@ -12,4 +12,4 @@ M: unix init-x-io dpy get XConnectionNumber <fd> dpy-fd set-global ;
M: unix wait-for-display dpy-fd get +input+ wait-for-fd ; M: unix wait-for-display dpy-fd get +input+ wait-for-fd ;
M: unix awaken-event-loop M: unix awaken-event-loop
dpy-fd get fd>> mx get remove-input-callbacks [ resume ] each ; dpy-fd get [ fd>> mx get remove-input-callbacks [ resume ] each ] when* ;

2
basis/x11/x11.factor
View File

@ -33,4 +33,4 @@ SYMBOL: root
: with-x ( display-string quot -- ) : with-x ( display-string quot -- )
[ init-x ] dip [ close-x ] [ ] cleanup ; inline [ init-x ] dip [ close-x ] [ ] cleanup ; inline
"io.backend.unix" vocab [ "x11.unix" require ] when "io.backend.unix" vocab [ "x11.io.unix" require ] when