This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
fortran/3877: Test program ff90-1.f fails at -O0
- To: gcc-gnats at gcc dot gnu dot org
- Subject: fortran/3877: Test program ff90-1.f fails at -O0
- From: David dot Billinghurst at riotinto dot com
- Date: 30 Jul 2001 15:01:13 -0000
- Reply-To: David dot Billinghurst at riotinto dot com
>Number: 3877
>Category: fortran
>Synopsis: Test program ff90-1.f fails at -O0
>Confidential: no
>Severity: non-critical
>Priority: medium
>Responsible: unassigned
>State: open
>Class: sw-bug
>Submitter-Id: net
>Arrival-Date: Mon Jul 30 08:06:01 PDT 2001
>Closed-Date:
>Last-Modified:
>Originator: David Billinghurst
>Release: gcc-3.1 20010727
>Organization:
>Environment:
i686-pc-cygwin NT4/SP5
>Description:
The following test program fails on i686-pc-cygwin when compiled with "-O0 -ff90". It passes at other optimization levels.
C Test compiler flags: -ff90
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 "-ff90" }
double complex z
z = (2.0d0,1.0d0)
call s(real(z))
end
subroutine s(x)
double precision x
if ( abs(z-2.0d0) .gt. 1.0e-5 ) call abort
end
>How-To-Repeat:
g77 -o a.out -ff90 -O0 ff90-1.f
./a.out
>Fix:
>Release-Note:
>Audit-Trail:
>Unformatted: