Return to io.c CVS log | Up to [gforth] / gforth / engine |
version 1.26, 2007/04/09 22:36:01 | version 1.27, 2007/07/01 18:32:11 |
---|---|
Line 622 long key_avail (FILE * stream) | Line 622 long key_avail (FILE * stream) |
{ | { |
int tty = fileno (stream); | int tty = fileno (stream); |
fd_set selin; | fd_set selin; |
static int now[2] = { 0 , 0 }; | static long int now[2] = { 0 , 0 }; |
int res; | int res; |
setvbuf(stream, NULL, _IONBF, 0); | setvbuf(stream, NULL, _IONBF, 0); |