aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Billinghurst <David.Billinghurst@riotinto.com>2004-09-03 03:29:10 +0000
committerDavid Billinghurst <billingd@gcc.gnu.org>2004-09-03 03:29:10 +0000
commit6df9867e9159eb2b84c6fb42276000a404d2232a (patch)
tree7eb9a597806446cb2154c2977934a007cd883c4d
parent1b08d87d349ea49109ca153f6cb2c75002dddb0f (diff)
downloadgcc-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/ChangeLog6
-rw-r--r--gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_i_char.f906
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