diff options
Diffstat (limited to 'gcc_arm/testsuite/gcc.c-torture/execute/complex-1.c')
-rwxr-xr-x | gcc_arm/testsuite/gcc.c-torture/execute/complex-1.c | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/gcc_arm/testsuite/gcc.c-torture/execute/complex-1.c b/gcc_arm/testsuite/gcc.c-torture/execute/complex-1.c deleted file mode 100755 index 424fa65..0000000 --- a/gcc_arm/testsuite/gcc.c-torture/execute/complex-1.c +++ /dev/null @@ -1,40 +0,0 @@ -double -g0 (double x) -{ - return 1.0; -} - -double -g1 (double x) -{ - return -1.0; -} - -double -g2 (double x) -{ - return 0.0; -} - -__complex__ double -cexp (__complex__ double x) -{ - double r; - - r = g0 (__real__ x); - __real__ x = r * g1 (__imag__ x); - __imag__ x = r * g2 (__imag__ x); - return x; -} - -main () -{ - __complex__ double x; - - x = cexp (1.0i); - if (__real__ x != -1.0) - abort (); - if (__imag__ x != 0.0) - abort (); - exit (0); -} |