cfad47cfa3/t3compiler/tads3/test/data/infloop.t
Download diff| 4b825dc642cb6eb9a060e54bf8d69288fbee4904 | cfad47cfa334b206c65f22086bcc5d63e6f70944 | ||
|---|---|---|---|
1 | #include <tads.h> | ||
2 | |||
3 | main(args) | ||
4 | { | ||
5 | local i; | ||
6 | |||
7 | "Entering an infinite loop...\n"; | ||
8 | for (i = 1 ; ; ++i) | ||
9 | { | ||
10 | f(i); | ||
11 | } | ||
12 | } | ||
13 | |||
14 | f(x) | ||
15 | { | ||
16 | return x; | ||
17 | } | ||
18 |