Patch to fix gfortran.dg/integer_exponentiation_3.F90 test

Steve Ellcey sje@cup.hp.com
Wed Jun 6 22:40:00 GMT 2007


The integer_exponentiation_3.F90 test is failing on the hppa64-*-*
target.  It looks like it needs to do an ATEST (approximate test) for
0.2**9 instead of an exact test.  This is already being done for other
comparisions in the same test program.

Tested on hppa64-hp-hpux11.11.  OK for checkin?

Steve Ellcey
sje@cup.hp.com

2007-06-06  Steve Ellcey  <sje@cup.hp.com>

	* gfortran.dg/integer_exponentiation_3.F90: Use approx. check.

Index: integer_exponentiation_3.F90
===================================================================
--- integer_exponentiation_3.F90	(revision 125352)
+++ integer_exponentiation_3.F90	(working copy)
@@ -175,7 +175,7 @@ program test
   TEST((1.0,0.2),0,c4)
   TEST((1.0,0.2),1,c4)
   TEST((1.0,0.2),2,c4)
-  TEST((1.0,0.2),9,c4)
+  ATEST((1.0,0.2),9,c4)
   ATEST((1.0,0.2),-1,c4)
   ATEST((1.0,0.2),-2,c4)
   ATEST((1.0,0.2),-9,c4)
@@ -183,7 +183,7 @@ program test
   TEST((0.0,0.2),0,c4)
   TEST((0.0,0.2),1,c4)
   TEST((0.0,0.2),2,c4)
-  TEST((0.0,0.2),9,c4)
+  ATEST((0.0,0.2),9,c4)
   ATEST((0.0,0.2),-1,c4)
   ATEST((0.0,0.2),-2,c4)
   ATEST((0.0,0.2),-9,c4)



More information about the Fortran mailing list