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-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=ecef6119cef58bc532fd4e326eb8c0afbd671dfc;p=platform%2Fupstream%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 87db870..0bebe9d 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 e9a2928..0d1570b 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 aec83ee..e8efab3 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 57e93fc..678161b 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 9663bd6..152f9f8 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 6e31382..e0975cf 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 03fda75..8d879fc 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 192ebe81f..ab7a6a4 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 150c1c6..a134d54 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 6c30885..f2d62f6 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 0146a2e..3e40997 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 0fe479c..0c7c5f3 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 6f4a10c..c09205e 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