From: Hans-Peter Nilsson Date: Mon, 6 Apr 2009 03:41:44 +0000 (+0000) Subject: namelist_51.f90, [...]: Gate test on effective_target fd_truncate. X-Git-Tag: releases/gcc-4.5.0~6883 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=ecef6119cef58bc532fd4e326eb8c0afbd671dfc;p=thirdparty%2Fgcc.git namelist_51.f90, [...]: Gate test on effective_target fd_truncate. * gfortran.dg/namelist_51.f90, gfortran.dg/utf8_2.f03, gfortran.dg/namelist_48.f90, gfortran.dg/read_repeat.f90, gfortran.dg/streamio_9.f90, gfortran.dg/widechar_IO_1.f90, gfortran.dg/namelist_50.f90, gfortran.dg/namelist_52.f90, gfortran.dg/utf8_1.f03, gfortran.dg/namelist_56.f90, gfortran.dg/namelist_49.f90: Gate test on effective_target fd_truncate. * gfortran.dg/widechar_IO_3.f90: Ditto. Fix typo in comment. From-SVN: r145580 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 87db870009db..0bebe9d821ff 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,14 @@ +2009-04-06 Hans-Peter Nilsson + + * gfortran.dg/namelist_51.f90, gfortran.dg/utf8_2.f03, + gfortran.dg/namelist_48.f90, gfortran.dg/read_repeat.f90, + gfortran.dg/streamio_9.f90, gfortran.dg/widechar_IO_1.f90, + gfortran.dg/namelist_50.f90, gfortran.dg/namelist_52.f90, + gfortran.dg/utf8_1.f03, gfortran.dg/namelist_56.f90, + gfortran.dg/namelist_49.f90: Gate test on effective_target + fd_truncate. + * gfortran.dg/widechar_IO_3.f90: Ditto. Fix typo in comment. + 2009-04-05 Daniel Kraft PR fortran/38654 diff --git a/gcc/testsuite/gfortran.dg/namelist_48.f90 b/gcc/testsuite/gfortran.dg/namelist_48.f90 index e9a29285b174..0d1570bf3047 100644 --- a/gcc/testsuite/gfortran.dg/namelist_48.f90 +++ b/gcc/testsuite/gfortran.dg/namelist_48.f90 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! { dg-options "-fbackslash" } ! PR36538 namelist failure with tabs preceding object name program check1 diff --git a/gcc/testsuite/gfortran.dg/namelist_49.f90 b/gcc/testsuite/gfortran.dg/namelist_49.f90 index aec83eea965d..e8efab33f3dc 100644 --- a/gcc/testsuite/gfortran.dg/namelist_49.f90 +++ b/gcc/testsuite/gfortran.dg/namelist_49.f90 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! { dg-options "-fbackslash" } ! PR36546 Namelist error with tab following a comma and newline program check1 diff --git a/gcc/testsuite/gfortran.dg/namelist_50.f90 b/gcc/testsuite/gfortran.dg/namelist_50.f90 index 57e93fcbf25b..678161b56d13 100644 --- a/gcc/testsuite/gfortran.dg/namelist_50.f90 +++ b/gcc/testsuite/gfortran.dg/namelist_50.f90 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! PR36657 Namelist string constant immediately followed by comment program gfcbug79 implicit none diff --git a/gcc/testsuite/gfortran.dg/namelist_51.f90 b/gcc/testsuite/gfortran.dg/namelist_51.f90 index 9663bd68d9fc..152f9f8d8dfe 100644 --- a/gcc/testsuite/gfortran.dg/namelist_51.f90 +++ b/gcc/testsuite/gfortran.dg/namelist_51.f90 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! PR36676 Namelist comment problems ! test case from PR, reduced by Jerry DeLisle program mem_nml diff --git a/gcc/testsuite/gfortran.dg/namelist_52.f90 b/gcc/testsuite/gfortran.dg/namelist_52.f90 index 6e31382927f4..e0975cf3ee8e 100644 --- a/gcc/testsuite/gfortran.dg/namelist_52.f90 +++ b/gcc/testsuite/gfortran.dg/namelist_52.f90 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! PR36582 Namelist I/O error: Bogus "Cannot match namelist object" ! Test case derived from PR. module mod1 diff --git a/gcc/testsuite/gfortran.dg/namelist_56.f90 b/gcc/testsuite/gfortran.dg/namelist_56.f90 index 03fda759f5c3..8d879fc910b5 100644 --- a/gcc/testsuite/gfortran.dg/namelist_56.f90 +++ b/gcc/testsuite/gfortran.dg/namelist_56.f90 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! PR37707 Namelist read of array of derived type incorrect ! Test case from Tobias Burnus IMPLICIT NONE diff --git a/gcc/testsuite/gfortran.dg/read_repeat.f90 b/gcc/testsuite/gfortran.dg/read_repeat.f90 index 192ebe81ffbf..ab7a6a4c7d5e 100644 --- a/gcc/testsuite/gfortran.dg/read_repeat.f90 +++ b/gcc/testsuite/gfortran.dg/read_repeat.f90 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! PR39528 repeated entries not read when using list-directed input. ! Test case derived from reporters example. program rread diff --git a/gcc/testsuite/gfortran.dg/streamio_9.f90 b/gcc/testsuite/gfortran.dg/streamio_9.f90 index 150c1c6c3934..a134d549e1f9 100644 --- a/gcc/testsuite/gfortran.dg/streamio_9.f90 +++ b/gcc/testsuite/gfortran.dg/streamio_9.f90 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! PR29053 Stream IO test 9. ! Contributed by Jerry DeLisle . ! Test case derived from that given in PR by Steve Kargl. diff --git a/gcc/testsuite/gfortran.dg/utf8_1.f03 b/gcc/testsuite/gfortran.dg/utf8_1.f03 index 6c30885cce52..f2d62f65b0b1 100644 --- a/gcc/testsuite/gfortran.dg/utf8_1.f03 +++ b/gcc/testsuite/gfortran.dg/utf8_1.f03 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! { dg-options "-fbackslash" } ! Contributed by Jerry DeLisle program test1 diff --git a/gcc/testsuite/gfortran.dg/utf8_2.f03 b/gcc/testsuite/gfortran.dg/utf8_2.f03 index 0146a2e281b7..3e409970bed2 100644 --- a/gcc/testsuite/gfortran.dg/utf8_2.f03 +++ b/gcc/testsuite/gfortran.dg/utf8_2.f03 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! { dg-options "-fbackslash" } ! Contributed by Tobias Burnus program test2 diff --git a/gcc/testsuite/gfortran.dg/widechar_IO_1.f90 b/gcc/testsuite/gfortran.dg/widechar_IO_1.f90 index 0fe479cda649..0c7c5f3f8078 100644 --- a/gcc/testsuite/gfortran.dg/widechar_IO_1.f90 +++ b/gcc/testsuite/gfortran.dg/widechar_IO_1.f90 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do run { target fd_truncate } } ! Wide chracter I/O test 1, formatted and mixed kind ! Test case developed by Jerry DeLisle program test1 diff --git a/gcc/testsuite/gfortran.dg/widechar_IO_3.f90 b/gcc/testsuite/gfortran.dg/widechar_IO_3.f90 index 6f4a10c857e1..c09205e2d7d3 100644 --- a/gcc/testsuite/gfortran.dg/widechar_IO_3.f90 +++ b/gcc/testsuite/gfortran.dg/widechar_IO_3.f90 @@ -1,5 +1,5 @@ -! { dg-do run } -! Wide chracter I/O test 3, unformatted arrays +! { dg-do run { target fd_truncate } } +! Wide character I/O test 3, unformatted arrays ! Test case developed by Jerry DeLisle program test1 integer, parameter :: k4 = 4