repo.or.cz
/
tangerine.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Use 'mail' instead of 'mutt', since it's more readily available and
[tangerine.git]
/
test
/
waitforchar.c
blob
bb6499698646e274e40e036d875ec51f0149b599
1
#include <proto/dos.h>
2
3
int
main
()
4
{
5
BPTR in
=
Input
();
6
BPTR out
=
Output
();
7
8
SetMode
(
in
,
1
);
9
10
Delay
(
25
);
11
12
if
(
WaitForChar
(
in
,
9000000
))
13
FPuts
(
out
,
"WaitForChar: char arrived
\n
"
);
14
else
15
FPuts
(
out
,
"WaitForChar: timeout
\n
"
);
16
17
Flush
(
in
);
18
Flush
(
out
);
19
20
SetMode
(
in
,
0
);
21
22
return
0
;
23
}