io.backend.unix: hints on M\ fd refill

Trims some low-order dispatch overhead for #376.
db4
Joe Groff 2011-11-09 15:38:03 -08:00
parent 22e9109631
commit 9443f30b7d
1 changed files with 4 additions and 1 deletions

View File

@ -7,7 +7,7 @@ io.encodings math.parser continuations system libc namespaces
make io.timeouts io.encodings.utf8 destructors make io.timeouts io.encodings.utf8 destructors
destructors.private accessors summary combinators locals destructors.private accessors summary combinators locals
unix.time unix.types fry io.backend.unix.multiplexers unix.time unix.types fry io.backend.unix.multiplexers
classes.struct ; classes.struct hints ;
QUALIFIED: io QUALIFIED: io
IN: io.backend.unix IN: io.backend.unix
@ -107,6 +107,9 @@ M: fd refill
[ (io-error) ] [ (io-error) ]
} cond ; } cond ;
HINTS: M\ fd refill
{ buffered-port fd } ;
M: unix (wait-to-read) ( port -- ) M: unix (wait-to-read) ( port -- )
dup dup
dup handle>> dup check-disposed refill dup dup handle>> dup check-disposed refill dup