OSDN Git Service

testsuite/
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.c-torture / execute / pr33142.c
1 int abs(int j);
2 extern void abort(void);
3
4 __attribute__((noinline)) int lisp_atan2(long dy, long dx) {
5     if (dx <= 0)
6         if (dy > 0)
7             return abs(dx) <= abs(dy);
8     return 0;
9 }
10
11 int main() {   
12     volatile long dy = 63, dx = -77;
13     if (lisp_atan2(dy, dx))
14         abort();
15     return 0;
16 }