re PR fortran/46325 (gfortran.dg/char_initialiser_actual.f90 FAILs with -fstack-protector)

2010-11-11  Jakub Jelinek <jakub@redhat.com>
            Tobias Burnus <burnus@net-b.de>

    PR fortran/46325
    * gfortran.dg/char_initialiser_actual.f90: Make test case valid. 

Co-Authored-By: Tobias Burnus <burnus@net-b.de>

From-SVN: r166628

gcc/testsuite/ChangeLog

+2010-11-11  Jakub Jelinek <jakub@redhat.com>
+	    Tobias Burnus <burnus@net-b.de>
+
+	PR fortran/46325
+	* gfortran.dg/char_initialiser_actual.f90: Make test case valid. 
+
 2010-11-11  Jan Hubicka  <jh@suse.cz>
 
 	* gcc.dg/20081223-1.c: Update LTO options.

gcc/testsuite/gfortran.dg/char_initialiser_actual.f90

@@ -24,6 +24,7 @@ contains
   function pfoo(ch2)
      character*5, dimension(:), target  :: ch2
      character*5, dimension(:), pointer :: pfoo
-     pfoo => ch2
+     allocate(pfoo(size(ch2)))
+     pfoo = ch2
   end function pfoo
 end program