* gcc.dg/20020919-1.c: Correct target selector to alpha*-*-*.

	* gcc.dg/pr31866.c: Ditto.
	* gcc.dg/torture/type-generic-1.c: Add -mieee for alpha*-*-* targets.
	* g++.dg/torture/type-generic-1.C: Ditto.
	* gfortran.dg/boz_9.f90: Ditto.
	* gfortran.dg/boz_14.f90: Ditto.
	* gfortran.dg/init_flag_3.f90: Ditto.
	* gfortran.dg/init_flag_4.f90: Ditto.
	* gfortran.dg/init_flag_5.f90: Ditto.
	* gfortran.dg/integer_exponentiation_1.f90: Ditto.
	* gfortran.dg/integer_exponentiation_5.F90: Ditto.
	* gfortran.dg/isnan_1.f90: Ditto.
	* gfortran.dg/isnan_2.f90: Ditto.
	* gfortran.dg/module_nan.f90: Ditto.
	* gfortran.dg/nan_1.f90: Ditto.
	* gfortran.dg/nan_2.f90: Ditto.
	* gfortran.dg/nan_3.f90: Ditto.
	* gfortran.dg/nan_4.f90: Ditto.
	* gfortran.dg/namelist_42.f90: Ditto.
	* gfortran.dg/namelist_43.f90: Ditto.
	* gfortran.dg/nearest_1.f90: Ditto.
	* gfortran.dg/nearest_2.f90: Ditto.
	* gfortran.dg/nearest_3.f90: Ditto.
	* gfortran.dg/pr37243.f: Ditto.
	* gfortran.dg/real_const_3.f90: Ditto.
	* gfortran.dg/transfer_simplify_2.f90: Ditto.
	* gfortran.fortran-torture/execute/intrinsic_spacing.x: New file.

	* gfortran.dg/default_format_denormal_1.f90: XFAIL on alpha.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@142639 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 3a14097..c147c4c 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,35 @@
+2008-12-10 Uros Bizjak <ubizjak@gmail.com>
+
+       * gcc.dg/20020919-1.c: Correct target selector to alpha*-*-*.
+       * gcc.dg/pr31866.c: Ditto.
+       * gcc.dg/torture/type-generic-1.c: Add -mieee for alpha*-*-* targets.
+       * g++.dg/torture/type-generic-1.C: Ditto.
+       * gfortran.dg/boz_9.f90: Ditto.
+       * gfortran.dg/boz_14.f90: Ditto.
+       * gfortran.dg/init_flag_3.f90: Ditto.
+       * gfortran.dg/init_flag_4.f90: Ditto.
+       * gfortran.dg/init_flag_5.f90: Ditto.
+       * gfortran.dg/integer_exponentiation_1.f90: Ditto.
+       * gfortran.dg/integer_exponentiation_5.F90: Ditto.
+       * gfortran.dg/isnan_1.f90: Ditto.
+       * gfortran.dg/isnan_2.f90: Ditto.
+       * gfortran.dg/module_nan.f90: Ditto.
+       * gfortran.dg/nan_1.f90: Ditto.
+       * gfortran.dg/nan_2.f90: Ditto.
+       * gfortran.dg/nan_3.f90: Ditto.
+       * gfortran.dg/nan_4.f90: Ditto.
+       * gfortran.dg/namelist_42.f90: Ditto.
+       * gfortran.dg/namelist_43.f90: Ditto.
+       * gfortran.dg/nearest_1.f90: Ditto.
+       * gfortran.dg/nearest_2.f90: Ditto.
+       * gfortran.dg/nearest_3.f90: Ditto.
+       * gfortran.dg/pr37243.f: Ditto.
+       * gfortran.dg/real_const_3.f90: Ditto.
+       * gfortran.dg/transfer_simplify_2.f90: Ditto.
+       * gfortran.fortran-torture/execute/intrinsic_spacing.x: New file.
+
+       * gfortran.dg/default_format_denormal_1.f90: XFAIL on alpha.
+

 2008-12-09  Mark Mitchell  <mark@codesourcery.com>
 
        PR c++/37971
 2008-12-09  Mark Mitchell  <mark@codesourcery.com>
 
        PR c++/37971

diff --git a/gcc/testsuite/g++.dg/torture/type-generic-1.C b/gcc/testsuite/g++.dg/torture/type-generic-1.C
index 7db2e69..e9c17c3 100644 (file)
--- a/gcc/testsuite/g++.dg/torture/type-generic-1.C
+++ b/gcc/testsuite/g++.dg/torture/type-generic-1.C
@@ -2,7 +2,7 @@
    without any fast-math flags.  */
 
 /* { dg-do run } */
    without any fast-math flags.  */
 
 /* { dg-do run } */

-/* { dg-options "-mieee" { target sh*-*-* } } */
+/* { dg-options "-mieee" { target alpha*-*-* sh*-*-* } } */

 /* { dg-skip-if "No Inf/NaN support" { spu-*-* } } */
 
 #include "../../gcc.dg/tg-tests.h"
 /* { dg-skip-if "No Inf/NaN support" { spu-*-* } } */
 
 #include "../../gcc.dg/tg-tests.h"

diff --git a/gcc/testsuite/gcc.dg/20020919-1.c b/gcc/testsuite/gcc.dg/20020919-1.c
index 15519be..6b8c5ba 100644 (file)
--- a/gcc/testsuite/gcc.dg/20020919-1.c
+++ b/gcc/testsuite/gcc.dg/20020919-1.c
@@ -8,7 +8,7 @@
    You must be this tall ---> fit two long longs in asm-declared registers
    to enter this amusement.  */
 
    You must be this tall ---> fit two long longs in asm-declared registers
    to enter this amusement.  */
 

-/* { dg-do compile { target alpha-*-* cris-*-* crisv32-*-* i?86-*-* mmix-*-* powerpc*-*-* rs6000-*-* x86_64-*-* } } */
+/* { dg-do compile { target alpha*-*-* cris-*-* crisv32-*-* i?86-*-* mmix-*-* powerpc*-*-* rs6000-*-* x86_64-*-* } } */

 /* { dg-options "-O2" } */
 
 /* Constructed examples; input/output (same register), output, input, and
 /* { dg-options "-O2" } */
 
 /* Constructed examples; input/output (same register), output, input, and

diff --git a/gcc/testsuite/gcc.dg/pr31866.c b/gcc/testsuite/gcc.dg/pr31866.c
index f1afd93..4081c0e 100644 (file)
--- a/gcc/testsuite/gcc.dg/pr31866.c
+++ b/gcc/testsuite/gcc.dg/pr31866.c
@@ -1,5 +1,5 @@
 /* PR tree-optimization/31866 */
 /* PR tree-optimization/31866 */

-/* { dg-do compile { target alpha-*-* cris-*-* crisv32-*-* i?86-*-* mmix-*-* powerpc*-*-* rs6000-*-* x86_64-*-* } } */
+/* { dg-do compile { target alpha*-*-* cris-*-* crisv32-*-* i?86-*-* mmix-*-* powerpc*-*-* rs6000-*-* x86_64-*-* } } */

 /* { dg-options "-O2" } */
 
 #if defined (__alpha__)
 /* { dg-options "-O2" } */
 
 #if defined (__alpha__)

diff --git a/gcc/testsuite/gcc.dg/torture/type-generic-1.c b/gcc/testsuite/gcc.dg/torture/type-generic-1.c
index 9a8e9d0..96b5d01 100644 (file)
--- a/gcc/testsuite/gcc.dg/torture/type-generic-1.c
+++ b/gcc/testsuite/gcc.dg/torture/type-generic-1.c
@@ -2,7 +2,7 @@
    without any fast-math flags.  */
 
 /* { dg-do run } */
    without any fast-math flags.  */
 
 /* { dg-do run } */

-/* { dg-options "-mieee" { target sh*-*-* } } */
+/* { dg-options "-mieee" { target alpha*-*-* sh*-*-* } } */

 /* { dg-skip-if "No Inf/NaN support" { spu-*-* } } */
 
 #include "../tg-tests.h"
 /* { dg-skip-if "No Inf/NaN support" { spu-*-* } } */
 
 #include "../tg-tests.h"

diff --git a/gcc/testsuite/gfortran.dg/boz_14.f90 b/gcc/testsuite/gfortran.dg/boz_14.f90
index a6690ce..dd7e58e 100644 (file)
--- a/gcc/testsuite/gfortran.dg/boz_14.f90
+++ b/gcc/testsuite/gfortran.dg/boz_14.f90
@@ -1,4 +1,5 @@
 ! { dg-do run }
 ! { dg-do run }

+! { dg-options "-mieee" { target alpha*-*-* } } 

 
 ! PR fortran/36214
 ! For BOZ-initialization of floats, the precision used to be wrong sometimes.
 
 ! PR fortran/36214
 ! For BOZ-initialization of floats, the precision used to be wrong sometimes.

diff --git a/gcc/testsuite/gfortran.dg/boz_9.f90 b/gcc/testsuite/gfortran.dg/boz_9.f90
index 1488c6d..db35da0 100644 (file)
--- a/gcc/testsuite/gfortran.dg/boz_9.f90
+++ b/gcc/testsuite/gfortran.dg/boz_9.f90
@@ -1,5 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }

+! { dg-options "-fno-range-check -mieee" { target alpha*-*-* } } 

 !
 ! PR fortran/34342
 !
 !
 ! PR fortran/34342
 !

diff --git a/gcc/testsuite/gfortran.dg/default_format_denormal_1.f90 b/gcc/testsuite/gfortran.dg/default_format_denormal_1.f90
index 181ae9d..c4d6086 100644 (file)
--- a/gcc/testsuite/gfortran.dg/default_format_denormal_1.f90
+++ b/gcc/testsuite/gfortran.dg/default_format_denormal_1.f90
@@ -1,4 +1,4 @@
-! { dg-do run { xfail *-*-darwin[89]* *-*-freebsd* *-*-mingw* } }
+! { dg-do run { xfail alpha*-*-* *-*-darwin[89]* *-*-freebsd* *-*-mingw* } }

 ! Test XFAILed on these platforms because the system's printf() lacks
 ! proper support for denormals.
 !
 ! Test XFAILed on these platforms because the system's printf() lacks
 ! proper support for denormals.
 !

diff --git a/gcc/testsuite/gfortran.dg/init_flag_3.f90 b/gcc/testsuite/gfortran.dg/init_flag_3.f90
index 7d6ab33..9724d39 100644 (file)
--- a/gcc/testsuite/gfortran.dg/init_flag_3.f90
+++ b/gcc/testsuite/gfortran.dg/init_flag_3.f90
@@ -1,6 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-finit-integer=-1 -finit-logical=false -finit-real=nan" }
 ! { dg-do run }
 ! { dg-options "-finit-integer=-1 -finit-logical=false -finit-real=nan" }

-! { dg-options "-mieee -finit-integer=-1 -finit-logical=false -finit-real=nan" { target sh*-*-* } }
+! { dg-options "-finit-integer=-1 -finit-logical=false -finit-real=nan -mieee" { target alpha*-*-* sh*-*-* } }

 
 program init_flag_3
   call real_test
 
 program init_flag_3
   call real_test

diff --git a/gcc/testsuite/gfortran.dg/init_flag_4.f90 b/gcc/testsuite/gfortran.dg/init_flag_4.f90
index 8ec40bc..8e1265e 100644 (file)
--- a/gcc/testsuite/gfortran.dg/init_flag_4.f90
+++ b/gcc/testsuite/gfortran.dg/init_flag_4.f90
@@ -1,5 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-finit-real=inf" }
 ! { dg-do run }
 ! { dg-options "-finit-real=inf" }

+! { dg-options "-finit-real=inf -mieee" { target alpha*-*-* } } */

 
 program init_flag_4
   call real_test
 
 program init_flag_4
   call real_test

diff --git a/gcc/testsuite/gfortran.dg/init_flag_5.f90 b/gcc/testsuite/gfortran.dg/init_flag_5.f90
index 51dbd16..5531251 100644 (file)
--- a/gcc/testsuite/gfortran.dg/init_flag_5.f90
+++ b/gcc/testsuite/gfortran.dg/init_flag_5.f90
@@ -1,5 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-finit-real=-inf" }
 ! { dg-do run }
 ! { dg-options "-finit-real=-inf" }

+! { dg-options "-finit-real=-inf -mieee" { target alpha*-*-* } } */

 
 program init_flag_5
   call real_test
 
 program init_flag_5
   call real_test

diff --git a/gcc/testsuite/gfortran.dg/integer_exponentiation_1.f90 b/gcc/testsuite/gfortran.dg/integer_exponentiation_1.f90
index bed7c6a..77ef84c 100644 (file)
--- a/gcc/testsuite/gfortran.dg/integer_exponentiation_1.f90
+++ b/gcc/testsuite/gfortran.dg/integer_exponentiation_1.f90
@@ -1,4 +1,5 @@
 ! { dg-do run }
 ! { dg-do run }

+! { dg-options "-pedantic -mieee" { target alpha*-*-* } }

 ! PR 30981 - this used to go into an endless loop during execution.
 program test
   a = 3.0
 ! PR 30981 - this used to go into an endless loop during execution.
 program test
   a = 3.0

diff --git a/gcc/testsuite/gfortran.dg/integer_exponentiation_5.F90 b/gcc/testsuite/gfortran.dg/integer_exponentiation_5.F90
index 07127c6..2fc8df3 100644 (file)
--- a/gcc/testsuite/gfortran.dg/integer_exponentiation_5.F90
+++ b/gcc/testsuite/gfortran.dg/integer_exponentiation_5.F90
@@ -1,5 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }

+! { dg-options "-fno-range-check -mieee" { target alpha*-*-* } } */

 module mod_check
   implicit none
 
 module mod_check
   implicit none
 

diff --git a/gcc/testsuite/gfortran.dg/isnan_1.f90 b/gcc/testsuite/gfortran.dg/isnan_1.f90
index db8f569..3c0cce8 100644 (file)
--- a/gcc/testsuite/gfortran.dg/isnan_1.f90
+++ b/gcc/testsuite/gfortran.dg/isnan_1.f90
@@ -1,7 +1,7 @@
 ! Test for the ISNAN intrinsic
 !
 ! { dg-do run }
 ! Test for the ISNAN intrinsic
 !
 ! { dg-do run }

-! { dg-options "-pedantic-errors -mieee" { target sh*-*-* } }
+! { dg-options "-pedantic-errors -mieee" { target alpha*-*-* sh*-*-* } }

 !
   implicit none
   real :: x
 !
   implicit none
   real :: x

diff --git a/gcc/testsuite/gfortran.dg/isnan_2.f90 b/gcc/testsuite/gfortran.dg/isnan_2.f90
index e16ce9d..37b5363 100644 (file)
--- a/gcc/testsuite/gfortran.dg/isnan_2.f90
+++ b/gcc/testsuite/gfortran.dg/isnan_2.f90
@@ -2,7 +2,7 @@
 !
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }
 !
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }

-! { dg-options "-fno-range-check -pedantic-errors -mieee" { target sh*-*-* } }
+! { dg-options "-fno-range-check -pedantic-errors -mieee" { target alpha*-*-* sh*-*-* } }

 !
   implicit none
   character(len=1) :: s
 !
   implicit none
   character(len=1) :: s

diff --git a/gcc/testsuite/gfortran.dg/module_nan.f90 b/gcc/testsuite/gfortran.dg/module_nan.f90
index 956b90c..52fa8a9 100644 (file)
--- a/gcc/testsuite/gfortran.dg/module_nan.f90
+++ b/gcc/testsuite/gfortran.dg/module_nan.f90
@@ -1,6 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }

-! { dg-options "-fno-range-check -mieee" { target sh*-*-* } }
+! { dg-options "-fno-range-check -mieee" { target alpha*-*-* sh*-*-* } }

 !
 ! PR fortran/34318
 !
 !
 ! PR fortran/34318
 !

diff --git a/gcc/testsuite/gfortran.dg/namelist_42.f90 b/gcc/testsuite/gfortran.dg/namelist_42.f90
index 55dd2ca..1aa75ab 100644 (file)
--- a/gcc/testsuite/gfortran.dg/namelist_42.f90
+++ b/gcc/testsuite/gfortran.dg/namelist_42.f90
@@ -1,5 +1,5 @@
 ! { dg-do run { target fd_truncate } }
 ! { dg-do run { target fd_truncate } }

-! { dg-options "-mieee" { target sh*-*-* } }
+! { dg-options "-mieee" { target alpha*-*-* sh*-*-* } }

 !
 ! PR fortran/34427
 !
 !
 ! PR fortran/34427
 !

diff --git a/gcc/testsuite/gfortran.dg/namelist_43.f90 b/gcc/testsuite/gfortran.dg/namelist_43.f90
index abad355..ad518dd 100644 (file)
--- a/gcc/testsuite/gfortran.dg/namelist_43.f90
+++ b/gcc/testsuite/gfortran.dg/namelist_43.f90
@@ -1,5 +1,5 @@
 ! { dg-do run { target fd_truncate } }
 ! { dg-do run { target fd_truncate } }

-! { dg-options "-mieee" { target sh*-*-* } }
+! { dg-options "-mieee" { target alpha*-*-* sh*-*-* } }

 !
 ! PR fortran/34427
 !
 !
 ! PR fortran/34427
 !

diff --git a/gcc/testsuite/gfortran.dg/nan_1.f90 b/gcc/testsuite/gfortran.dg/nan_1.f90
index 0c9eb04..6b7e19f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/nan_1.f90
+++ b/gcc/testsuite/gfortran.dg/nan_1.f90
@@ -2,7 +2,7 @@
 ! as arguments
 !
 ! { dg-do run }
 ! as arguments
 !
 ! { dg-do run }

-! { dg-options "-pedantic-errors -mieee" { target sh*-*-* } } 
+! { dg-options "-pedantic-errors -mieee" { target alpha*-*-* sh*-*-* } } 

 !
 module aux2
   interface isnan
 !
 module aux2
   interface isnan

diff --git a/gcc/testsuite/gfortran.dg/nan_2.f90 b/gcc/testsuite/gfortran.dg/nan_2.f90
index 49e1c39..3098771 100644 (file)
--- a/gcc/testsuite/gfortran.dg/nan_2.f90
+++ b/gcc/testsuite/gfortran.dg/nan_2.f90
@@ -1,6 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-fno-range-check -pedantic" }
 ! { dg-do run }
 ! { dg-options "-fno-range-check -pedantic" }

-! { dg-options "-fno-range-check -pedantic -mieee" { target sh*-*-* } }
+! { dg-options "-fno-range-check -pedantic -mieee" { target alpha*-*-* sh*-*-* } }

 !
 ! PR fortran/34333
 !
 !
 ! PR fortran/34333
 !

diff --git a/gcc/testsuite/gfortran.dg/nan_3.f90 b/gcc/testsuite/gfortran.dg/nan_3.f90
index 957b94d..adc9276 100644 (file)
--- a/gcc/testsuite/gfortran.dg/nan_3.f90
+++ b/gcc/testsuite/gfortran.dg/nan_3.f90
@@ -1,6 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }

-! { dg-options "-fno-range-check -mieee" { target sh*-*-* } }
+! { dg-options "-fno-range-check -mieee" { target alpha*-*-* sh*-*-* } }

 !
 ! PR fortran/34319
 !
 !
 ! PR fortran/34319
 !

diff --git a/gcc/testsuite/gfortran.dg/nan_4.f90 b/gcc/testsuite/gfortran.dg/nan_4.f90
index 771aad0..7c37671 100644 (file)
--- a/gcc/testsuite/gfortran.dg/nan_4.f90
+++ b/gcc/testsuite/gfortran.dg/nan_4.f90
@@ -1,6 +1,6 @@
 ! { dg-do compile }
 ! { dg-options "-std=gnu" } 
 ! { dg-do compile }
 ! { dg-options "-std=gnu" } 

-! { dg-options "-std=gnu -mieee" { target sh*-*-* } } 
+! { dg-options "-std=gnu -mieee" { target alpha*-*-* sh*-*-* } } 

 !
 ! PR fortran/34398.
 !
 !
 ! PR fortran/34398.
 !

diff --git a/gcc/testsuite/gfortran.dg/nearest_1.f90 b/gcc/testsuite/gfortran.dg/nearest_1.f90
index c80f3a6..64e2b85 100644 (file)
--- a/gcc/testsuite/gfortran.dg/nearest_1.f90
+++ b/gcc/testsuite/gfortran.dg/nearest_1.f90
@@ -1,5 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-O0 -ffloat-store" }
 ! { dg-do run }
 ! { dg-options "-O0 -ffloat-store" }

+! { dg-options "-O0 -ffloat-store -mieee" { target alpha*-*-* } }

 ! PR fortran/27021
 ! Original code submitted by Dominique d'Humieres
 ! Converted to Dejagnu for the testsuite by Steven G. Kargl
 ! PR fortran/27021
 ! Original code submitted by Dominique d'Humieres
 ! Converted to Dejagnu for the testsuite by Steven G. Kargl

diff --git a/gcc/testsuite/gfortran.dg/nearest_2.f90 b/gcc/testsuite/gfortran.dg/nearest_2.f90
index 08c7744..8bb4768 100644 (file)
--- a/gcc/testsuite/gfortran.dg/nearest_2.f90
+++ b/gcc/testsuite/gfortran.dg/nearest_2.f90
@@ -1,6 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }
 ! { dg-do run }
 ! { dg-options "-fno-range-check" }

-! { dg-options "-fno-range-check -mieee" { target sh*-*-* } }
+! { dg-options "-fno-range-check -mieee" { target alpha*-*-* sh*-*-* } }

 !
 ! PR fortran/34192
 !
 !
 ! PR fortran/34192
 !

diff --git a/gcc/testsuite/gfortran.dg/nearest_3.f90 b/gcc/testsuite/gfortran.dg/nearest_3.f90
index 4262a8c..3af4cfc 100644 (file)
--- a/gcc/testsuite/gfortran.dg/nearest_3.f90
+++ b/gcc/testsuite/gfortran.dg/nearest_3.f90
@@ -1,5 +1,5 @@
 ! { dg-do run }
 ! { dg-do run }

-! { dg-options "-pedantic-errors -mieee" { target sh*-*-* } } 
+! { dg-options "-pedantic-errors -mieee" { target alpha*-*-* sh*-*-* } } 

 !
 ! PR fortran/34209
 !
 !
 ! PR fortran/34209
 !

diff --git a/gcc/testsuite/gfortran.dg/pr37243.f b/gcc/testsuite/gfortran.dg/pr37243.f
index 143800c..ba65212 100644 (file)
--- a/gcc/testsuite/gfortran.dg/pr37243.f
+++ b/gcc/testsuite/gfortran.dg/pr37243.f
@@ -1,5 +1,6 @@
 ! PR rtl-optimization/37243
 ! { dg-do run }
 ! PR rtl-optimization/37243
 ! { dg-do run }

+! { dg-options "-mieee" { target alpha*-*-* } }

 ! Check if register allocator handles IR flattening correctly.
       SUBROUTINE SCHMD(V,M,N,LDV)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)
 ! Check if register allocator handles IR flattening correctly.
       SUBROUTINE SCHMD(V,M,N,LDV)
       IMPLICIT DOUBLE PRECISION(A-H,O-Z)

diff --git a/gcc/testsuite/gfortran.dg/real_const_3.f90 b/gcc/testsuite/gfortran.dg/real_const_3.f90
index a05986f..90e8208 100644 (file)
--- a/gcc/testsuite/gfortran.dg/real_const_3.f90
+++ b/gcc/testsuite/gfortran.dg/real_const_3.f90
@@ -1,6 +1,6 @@
 !{ dg-do run }
 !{ dg-options "-fno-range-check" }
 !{ dg-do run }
 !{ dg-options "-fno-range-check" }

-!{ dg-options "-fno-range-check -mieee" { target sh*-*-* } }
+!{ dg-options "-fno-range-check -mieee" { target alpha*-*-* sh*-*-* } }

 ! PR19310 and PR19904, allow disabling range check during compile.
 ! Contributed by Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 program main
 ! PR19310 and PR19904, allow disabling range check during compile.
 ! Contributed by Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 program main

diff --git a/gcc/testsuite/gfortran.dg/transfer_simplify_2.f90 b/gcc/testsuite/gfortran.dg/transfer_simplify_2.f90
index 96bf283..dbad84e 100644 (file)
--- a/gcc/testsuite/gfortran.dg/transfer_simplify_2.f90
+++ b/gcc/testsuite/gfortran.dg/transfer_simplify_2.f90
@@ -1,5 +1,6 @@
 ! { dg-do run }
 ! { dg-options "-O2" }
 ! { dg-do run }
 ! { dg-options "-O2" }

+! { dg-options "-O2 -mieee" { target alpha*-*-* } }

 ! Tests the fix for the meta-bug PR31237 (TRANSFER intrinsic)
 ! Exercises gfc_simplify_transfer a random walk through types and shapes
 ! and compares its results with the middle-end version that operates on
 ! Tests the fix for the meta-bug PR31237 (TRANSFER intrinsic)
 ! Exercises gfc_simplify_transfer a random walk through types and shapes
 ! and compares its results with the middle-end version that operates on

diff --git a/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_spacing.x b/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_spacing.x
new file mode 100644 (file)
index 0000000..dad399d
--- /dev/null
+++ b/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_spacing.x
@@ -0,0 +1,2 @@
+add-ieee-options
+return 0