maxlocval_2.f90: Add -mieee for alpha*-*-* and sh*-*-* targets.
authorKaz Kojima <kkojima@gcc.gnu.org>
Tue, 28 Jul 2009 22:48:09 +0000 (22:48 +0000)
committerKaz Kojima <kkojima@gcc.gnu.org>
Tue, 28 Jul 2009 22:48:09 +0000 (22:48 +0000)
* gfortran.dg/maxlocval_2.f90: Add -mieee for alpha*-*-* and
sh*-*-* targets.  Skip on spu-*-* targets.
* gfortran.dg/maxlocval_4.f90: Likewise.
* gfortran.dg/minlocval_1.f90: Likewise.
* gfortran.dg/minlocval_4.f90: Likewise.

From-SVN: r150189

gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/maxlocval_2.f90
gcc/testsuite/gfortran.dg/maxlocval_4.f90
gcc/testsuite/gfortran.dg/minlocval_1.f90
gcc/testsuite/gfortran.dg/minlocval_4.f90

index ac5dc98973ff538b7f32499655175aa048e28479..e2b4211fb8c035c78d1003a5fbc7336648094e32 100644 (file)
@@ -1,3 +1,11 @@
+2009-07-28  Kaz Kojima  <kkojima@gcc.gnu.org>
+
+       * gfortran.dg/maxlocval_2.f90: Add -mieee for alpha*-*-* and
+       sh*-*-* targets.  Skip on spu-*-* targets.
+       * gfortran.dg/maxlocval_4.f90: Likewise.
+       * gfortran.dg/minlocval_1.f90: Likewise.
+       * gfortran.dg/minlocval_4.f90: Likewise.
+
 2009-07-28  Jakub Jelinek  <jakub@redhat.com>
 
        PR fortran/40878
index 82f917a9bc16047e2f06b07c2950ac24f60f003b..afbfee030fe33aa5973b56daf393a417e9a864dc 100644 (file)
@@ -1,4 +1,6 @@
 ! { dg-do run }
+! { dg-options "-mieee" { target alpha*-*-* sh*-*-* } } 
+! { dg-skip-if "NaN not supported" { spu-*-* } { "*" } { "" } }
   real :: a(3), nan, minf, pinf
   real, allocatable :: c(:)
   logical :: l
index 408b08d6fadcea8d37f335c57bc918f5ecb860a7..8edf5357c317624133f4e1966c3aa386ea1aa8ee 100644 (file)
@@ -1,4 +1,6 @@
 ! { dg-do run }
+! { dg-options "-mieee" { target alpha*-*-* sh*-*-* } } 
+! { dg-skip-if "NaN not supported" { spu-*-* } { "*" } { "" } }
   real :: a(3,3), b(3), nan, minf, pinf, h
   logical :: l, l2
   logical :: l3(3,3), l4(3,3), l5(3,3)
index f821e54bd68bec024eb67394c2f32f59445b6a5c..b66499afca908e0bd7af897eec4a223b1dcb2a37 100644 (file)
@@ -1,4 +1,6 @@
 ! { dg-do run }
+! { dg-options "-mieee" { target alpha*-*-* sh*-*-* } } 
+! { dg-skip-if "NaN not supported" { spu-*-* } { "*" } { "" } }
   real :: a(3), nan, minf, pinf
   real, allocatable :: c(:)
   logical :: l
index 1e72ba8e2a93301175e97a843d23b1506b8888cd..5332e823a7e088244b8cdf89b416b28e7701d350 100644 (file)
@@ -1,4 +1,6 @@
 ! { dg-do run }
+! { dg-options "-mieee" { target alpha*-*-* sh*-*-* } } 
+! { dg-skip-if "NaN not supported" { spu-*-* } { "*" } { "" } }
   real :: a(3,3), b(3), nan, minf, pinf, h
   logical :: l, l2
   logical :: l3(3,3), l4(3,3), l5(3,3)