home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 2
/
ctrom_ii_b.zip
/
ctrom_ii_b
/
PROGRAM
/
C
/
SMALL_C
/
POLL.C
< prev
next >
Wrap
Text File
|
1987-10-04
|
384b
|
20 lines
#define NOCCARGC /* no argument count passing */
#include stdio.h
#include clib.def
/*
** Poll for console input or interruption
*/
poll(pause) int pause; {
int i;
i = Dcio(255);
if(pause) {
if(i == PAUSE) {
while(!(i = Dcio(255))) ;
if(i == ABORT) exit(0);
return (0);
}
if(i == ABORT) exit(0);
}
return (i);
}