diff options
| -rw-r--r-- | gcc/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_pack.f90 | 3 |
2 files changed, 6 insertions, 3 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 99ba040..a244c2a 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -2,7 +2,11 @@ PR fortran/17568 * gfortran.dg/ishft.f90: New test. - + + PR fortran/17283 + * gfortran.fortran-torture/execute/intrinsic_pack.f90: Enable new + tests. + 2004-10-06 Paul Brook <paul@codesourcery.com> * gfortran.dg/do_1.f90: New test. diff --git a/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_pack.f90 b/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_pack.f90 index 427fe55..28cd1cd 100644 --- a/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_pack.f90 +++ b/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_pack.f90 @@ -11,8 +11,7 @@ program intrinsic_pack b = pack (a(2:3, 2:3), a(2:3, 2:3) .ne. 0, (/1, 2, 3, 4, 5, 6/)); if (any (b .ne. (/9, 7, 3, 4, 5, 6/))) call abort -! this is waiting for PR 17756 to be fixed -! call tests_with_temp() + call tests_with_temp() contains subroutine tests_with_temp ! A few tests which involve a temporary |