aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorSteve Ellcey <sje@cup.hp.com>2008-11-03 23:08:28 +0000
committerSteve Ellcey <sje@gcc.gnu.org>2008-11-03 23:08:28 +0000
commitf61d4b67ff5a1dd89acba91b3f5389128ceb929d (patch)
treee7b3355b388a4b450be965a5433a4f08e290a208 /gcc
parent38db79a685a184f994dff76c5303db535fa9bd9e (diff)
downloadgcc-f61d4b67ff5a1dd89acba91b3f5389128ceb929d.zip
gcc-f61d4b67ff5a1dd89acba91b3f5389128ceb929d.tar.gz
gcc-f61d4b67ff5a1dd89acba91b3f5389128ceb929d.tar.bz2
re PR libfortran/37839 (st_parameter_dt has unwanted padding, is out of sync with compiler)
* gfortran.dg/f2003_io_1.f03: XFAIL until PR37839 is fixed. * gfortran.dg/f2003_io_4.f03: Ditto. * gfortran.dg/f2003_io_5.f03: Ditto. * gfortran.dg/f2003_io_6.f03: Ditto. * gfortran.dg/f2003_io_7.f03: Ditto. From-SVN: r141566
Diffstat (limited to 'gcc')
-rw-r--r--gcc/testsuite/ChangeLog8
-rw-r--r--gcc/testsuite/gfortran.dg/f2003_io_1.f031
-rw-r--r--gcc/testsuite/gfortran.dg/f2003_io_4.f031
-rw-r--r--gcc/testsuite/gfortran.dg/f2003_io_5.f031
-rw-r--r--gcc/testsuite/gfortran.dg/f2003_io_6.f031
-rw-r--r--gcc/testsuite/gfortran.dg/f2003_io_7.f031
6 files changed, 13 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 7ea6ea0..72ef87d 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,11 @@
+2008-11-03 Steve Ellcey <sje@cup.hp.com>
+
+ * gfortran.dg/f2003_io_1.f03: XFAIL until PR37839 is fixed.
+ * gfortran.dg/f2003_io_4.f03: Ditto.
+ * gfortran.dg/f2003_io_5.f03: Ditto.
+ * gfortran.dg/f2003_io_6.f03: Ditto.
+ * gfortran.dg/f2003_io_7.f03: Ditto.
+
2008-11-03 Jakub Jelinek <jakub@redhat.com>
PR testsuite/37241
diff --git a/gcc/testsuite/gfortran.dg/f2003_io_1.f03 b/gcc/testsuite/gfortran.dg/f2003_io_1.f03
index f1d67c5..d3a75ae 100644
--- a/gcc/testsuite/gfortran.dg/f2003_io_1.f03
+++ b/gcc/testsuite/gfortran.dg/f2003_io_1.f03
@@ -1,5 +1,6 @@
! { dg-do run { target fd_truncate } }
! { dg-options "-std=gnu" }
+! { dg-xfail-run-if "PR37839" { { ia64-*-hpux* hppa*-*-* powerpc*-*-* sparc*-sun-solaris2.* } && ilp32 } { "*" } { "" } }
! Test case prepared by Jerry DeLisle <jvdelisle@gcc.gnu.org>
real :: a(4), b(4)
real :: c
diff --git a/gcc/testsuite/gfortran.dg/f2003_io_4.f03 b/gcc/testsuite/gfortran.dg/f2003_io_4.f03
index 92c708c..46743c9 100644
--- a/gcc/testsuite/gfortran.dg/f2003_io_4.f03
+++ b/gcc/testsuite/gfortran.dg/f2003_io_4.f03
@@ -1,4 +1,5 @@
! { dg-do run { target fd_truncate } }
+! { dg-xfail-run-if "PR37839" { { ia64-*-hpux* hppa*-*-* powerpc*-*-* sparc*-sun-solaris2.* } && ilp32 } { "*" } { "" } }
! Test case prepared by Jerry DeLisle <jvdelisle@gcc.gnu.org>
! Test of decimal= feature
diff --git a/gcc/testsuite/gfortran.dg/f2003_io_5.f03 b/gcc/testsuite/gfortran.dg/f2003_io_5.f03
index 3949b1a..64d8ba4 100644
--- a/gcc/testsuite/gfortran.dg/f2003_io_5.f03
+++ b/gcc/testsuite/gfortran.dg/f2003_io_5.f03
@@ -1,4 +1,5 @@
! { dg-do run { target fd_truncate } }
+! { dg-xfail-run-if "PR37839" { { ia64-*-hpux* hppa*-*-* powerpc*-*-* sparc*-sun-solaris2.* } && ilp32 } { "*" } { "" } }
! Test case prepared by Jerry DeLisle <jvdelisle@gcc.gnu.org>
! Test of decimal="comma" in namelist and complex
integer :: i
diff --git a/gcc/testsuite/gfortran.dg/f2003_io_6.f03 b/gcc/testsuite/gfortran.dg/f2003_io_6.f03
index 40758e2..76876b6 100644
--- a/gcc/testsuite/gfortran.dg/f2003_io_6.f03
+++ b/gcc/testsuite/gfortran.dg/f2003_io_6.f03
@@ -1,4 +1,5 @@
! { dg-do run }
+! { dg-xfail-run-if "PR37839" { { ia64-*-hpux* hppa*-*-* powerpc*-*-* sparc*-sun-solaris2.* } && ilp32 } { "*" } { "" } }
! Test case prepared by Jerry DeLisle <jvdelisle@gcc.gnu.org>
! Test of decimal="comma" in namelist, checks separators
implicit none
diff --git a/gcc/testsuite/gfortran.dg/f2003_io_7.f03 b/gcc/testsuite/gfortran.dg/f2003_io_7.f03
index f457417..85dd456 100644
--- a/gcc/testsuite/gfortran.dg/f2003_io_7.f03
+++ b/gcc/testsuite/gfortran.dg/f2003_io_7.f03
@@ -1,4 +1,5 @@
! { dg-do run { target fd_truncate } }
+! { dg-xfail-run-if "PR37839" { { ia64-*-hpux* hppa*-*-* powerpc*-*-* sparc*-sun-solaris2.* } && ilp32 } { "*" } { "" } }
! Test case prepared by Jerry DeLisle <jvdelisle@gcc.gnu.org>
! Test of sign=, decimal=, and blank= .
program iotests