repo.or.cz
/
AROS.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Get icon from "ENVARC:" (default icons are no longer copied to "ENV:" at boot).
[AROS.git]
/
test
/
waitforchar.c
blob
5088d1dbd47aa22e9b1c0b9e980b17b00c2546c7
1
/*
2
Copyright © 1995-2014, The AROS Development Team. All rights reserved.
3
$Id$
4
*/
5
6
#include <proto/dos.h>
7
8
int
main
()
9
{
10
BPTR in
=
Input
();
11
BPTR out
=
Output
();
12
13
SetMode
(
in
,
1
);
14
15
Delay
(
25
);
16
17
if
(
WaitForChar
(
in
,
9000000
))
18
FPuts
(
out
,
"WaitForChar: char arrived
\n
"
);
19
else
20
FPuts
(
out
,
"WaitForChar: timeout
\n
"
);
21
22
Flush
(
in
);
23
Flush
(
out
);
24
25
SetMode
(
in
,
0
);
26
27
return
0
;
28
}