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

gcc/testsuite/ChangeLog

+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.

gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_i_char.f90

-! simple test for the CHAR and ICHAR intrinsics
-! PR 16579
-DO I=0,255
-   IF (ICHAR(CHAR(I)) /= I) CALL ABORT()
-END DO
-END