diff options
Diffstat (limited to 'gcc/testsuite/g77.dg/fno-f90-1.f')
| -rw-r--r-- | gcc/testsuite/g77.dg/fno-f90-1.f | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/gcc/testsuite/g77.dg/fno-f90-1.f b/gcc/testsuite/g77.dg/fno-f90-1.f deleted file mode 100644 index ac0f967505b..00000000000 --- a/gcc/testsuite/g77.dg/fno-f90-1.f +++ /dev/null @@ -1,15 +0,0 @@ -C Test compiler flags: -fno-f90 -C Origin: David Billinghurst <David.Billinghurst@riotinto.com> -C -C Read the g77 manual entry on CMPAMBIG -C -C { dg-do run } -C { dg-options "-fno-f90 -fugly-complex" } - double complex z - z = (2.0d0,1.0d0) - call s(real(z)) - end - subroutine s(x) - real x - if ( abs(x-2.0) .gt. 1.0e-5 ) call abort - end |