default_format_denormal_2.f90: Add ieee options.

	* gfortran.dg/default_format_denormal_2.f90: Add ieee options.
	* gfortran.dg/default_format_denormal_1.f90: Ditto.  Remove
	alpha*-*-* target from XFAIL list.

From-SVN: r151769

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 79d97e7ce0f72860d7a8a64533e66c8d7752bead..57c38f1a14ee3acd9293c8a3116166d23deba9d8 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2009-09-16  Uros Bizjak  <ubizjak@gmail.com>
+
+       * gfortran.dg/default_format_denormal_2.f90: Add ieee options.
+       * gfortran.dg/default_format_denormal_1.f90: Ditto.  Remove
+       alpha*-*-* target from XFAIL list.
+
 2009-08-31  Gerald Pfeifer  <gerald@pfeifer.com>
 
        * gcc.dg/builtins-config.h (HAVE_C99_RUNTIME): Do not define

diff --git a/gcc/testsuite/gfortran.dg/default_format_denormal_1.f90 b/gcc/testsuite/gfortran.dg/default_format_denormal_1.f90
index 838c338cc2df81219613e70c315af33c709ef083..c3cd141fd1a114a5ea01bcb013abbad34d694837 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 alpha*-*-* *-apple-darwin* *-*-freebsd* } }
+! { dg-do run { xfail *-apple-darwin* *-*-freebsd* } }
 ! Test XFAILed on these platforms because the system's printf() lacks
 ! proper support for denormals.
 !
@@ -6,6 +6,8 @@
 ! wide enough and have enough precision, by checking that values can
 ! be written and read back.
 !
+! { dg-options "-mieee" { target alpha*-*-* } }
+
 include "default_format_1.inc"
 
 program main

diff --git a/gcc/testsuite/gfortran.dg/default_format_denormal_2.f90 b/gcc/testsuite/gfortran.dg/default_format_denormal_2.f90
index 0ae32f8cb60b343e88b37ac4fe88b29c52348052..4d44dff69d45f1366273f96173cb658a2bbf614e 100644 (file)
--- a/gcc/testsuite/gfortran.dg/default_format_denormal_2.f90
+++ b/gcc/testsuite/gfortran.dg/default_format_denormal_2.f90
@@ -7,6 +7,8 @@
 ! wide enough and have enough precision, by checking that values can
 ! be written and read back.
 !
+! { dg-options "-mieee" { target alpha*-*-* } }
+
 include "default_format_2.inc"
 
 program main