clean up comments
parent
b0932edbb6
commit
b3b81f8834
|
@ -11,7 +11,6 @@ USING: compiler namespaces kernel win32-io-internals win32-stream win32-api
|
||||||
IN: io-internals
|
IN: io-internals
|
||||||
|
|
||||||
: io-multiplex ( ms -- )
|
: io-multiplex ( ms -- )
|
||||||
#! FIXME: needs to work given a timeout (???)
|
|
||||||
dup -1 = [ drop INFINITE ] when cancel-timedout wait-for-io
|
dup -1 = [ drop INFINITE ] when cancel-timedout wait-for-io
|
||||||
swap [ schedule-thread-with ] [ drop ] if* ;
|
swap [ schedule-thread-with ] [ drop ] if* ;
|
||||||
|
|
||||||
|
|
|
@ -1,4 +1,4 @@
|
||||||
! Copyright (C) 2004, 2006 Mackenzie Straight, Doug Coleman.
|
! Copyright (C) 2006 Mackenzie Straight, Doug Coleman.
|
||||||
|
|
||||||
IN: win32-stream
|
IN: win32-stream
|
||||||
USING: alien errors generic hashtables io-internals kernel
|
USING: alien errors generic hashtables io-internals kernel
|
||||||
|
|
Loading…
Reference in New Issue