diff options
author | David Billinghurst <David.Billinghurst@riotinto.com> | 2004-09-03 03:29:10 +0000 |
---|---|---|
committer | David Billinghurst <billingd@gcc.gnu.org> | 2004-09-03 03:29:10 +0000 |
commit | 6df9867e9159eb2b84c6fb42276000a404d2232a (patch) | |
tree | 7eb9a597806446cb2154c2977934a007cd883c4d | |
parent | 1b08d87d349ea49109ca153f6cb2c75002dddb0f (diff) | |
download | gcc-6df9867e9159eb2b84c6fb42276000a404d2232a.zip gcc-6df9867e9159eb2b84c6fb42276000a404d2232a.tar.gz gcc-6df9867e9159eb2b84c6fb42276000a404d2232a.tar.bz2 |
re PR fortran/16579 (gfortran: (ICHAR(CHAR(I)) .NE. I) when 128 <= I <= 255)
2004-09-03 David Billinghurst <David.Billinghurst@riotinto.com>
PR fortran/16579
* gfortran.fortran-torture/execute/intrinsic_i_char.f90:
Delete. Duplicate of gfortran.dg/g77/20010610.f
From-SVN: r87024
-rw-r--r-- | gcc/testsuite/ChangeLog | 6 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_i_char.f90 | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 428480c..5977332 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2004-09-03 David Billinghurst <David.Billinghurst@riotinto.com> + + PR fortran/16579 + * gfortran.fortran-torture/execute/intrinsic_i_char.f90: + Delete. Duplicate of gfortran.dg/g77/20010610.f + 2004-09-02 Mark Mitchell <mark@codesourcery.com> * g++.dg/abi/arm_rtti1.C: New test. diff --git a/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_i_char.f90 b/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_i_char.f90 deleted file mode 100644 index 19cab9f..0000000 --- a/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_i_char.f90 +++ /dev/null @@ -1,6 +0,0 @@ -! simple test for the CHAR and ICHAR intrinsics -! PR 16579 -DO I=0,255 - IF (ICHAR(CHAR(I)) /= I) CALL ABORT() -END DO -END |