re PR fortran/36724 (ICE: (character pointer targets substring))

2008-07-27  Daniel Franke  <franke.daniel@gmail.com>

	PR fortran/36724
	* gfortran.dg/pointer_to_substring.f90: New test.

From-SVN: r138190

gcc/testsuite/ChangeLog

+2008-07-27  Daniel Franke  <franke.daniel@gmail.com>
+
+	PR fortran/36724
+	* gfortran.dg/pointer_to_substring.f90: New test.
+
 2008-07-27  Tobias Burnus  <burnus@net-b.de>
 
 	PR fortran/36132
 	PR fortran/29952
 	PR fortran/36909
-	gfortran.dg/internal_pack_4.f90: New.
-	gfortran.dg/internal_pack_5.f90: New.
-	gfortran.dg/array_temporaries_2.f90: New.
+	* gfortran.dg/internal_pack_4.f90: New.
+	* gfortran.dg/internal_pack_5.f90: New.
+	* gfortran.dg/array_temporaries_2.f90: New.
 
 2008-07-26  Thomas Koenig  <tkoenig@gcc.gnu.org>
 

gcc/testsuite/gfortran.dg/pointer_to_substring.f90

+! { dg-do compile }
+! PR36724 - ICE on pointer to substring
+! testcase contributed by Loukas Peristeras.
+
+  character(LEN=132), target :: line
+  character(LEN=1), pointer :: t
+
+  read(*,'(A)') line
+  t=>line(1:1)
+end