OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

re PR fortran/38955 (testsuite/gfortran.dg/array_constructor_24.f fails due to floating point comparison) 

2009-01-24 David Billinghurst (billingd@gcc.gnu.org)

	PR fortran/38955
	* gfortran.dg/array_constructor_24.f: Allow tolerance when 
	comparing floats

From-SVN: r143600
This commit is contained in:
David Billinghurst 2009-01-24 08:00:13 +00:00
parent b840fb02f5
commit 8cd9b95149
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,9 @@
2009-01-24 David Billinghurst (billingd@gcc.gnu.org)
PR fortran/38955
* gfortran.dg/array_constructor_24.f: Allow tolerance when
comparing floats
2009-01-24 Sebastian Pop <sebastian.pop@amd.com>
PR tree-optimization/38953

2
gcc/testsuite/gfortran.dg/array_constructor_24.f
View File

@ -19,7 +19,7 @@
DDA1 = ATAN2 ((/(REAL(J1,KV),J1=1,10)/),
$ REAL((/(J1,J1=nf10,nf1,mf1)/), KV)) !fails
DDA2 = ATAN2 (DDA, DDA(10:1:-1))
if (any (DDA1 .ne. DDA2)) call abort ()
if (any (abs(DDA1-DDA2) .gt. 1.0e-6)) call abort ()
END
subroutine FA6077 (nf10,nf1,mf1, ida)