diff options
| author | Jakub Jelinek <jakub@redhat.com> | 2010-11-12 00:02:03 +0100 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2010-11-12 00:02:03 +0100 |
| commit | 58ebaaf1882529ce8acf12add37e4df66d876f3e (patch) | |
| tree | 06e8a323572fd5137dd7b20f7dfb88a79765f8f6 /gcc | |
| parent | 014d92e193f6ef3d06143984524b72ee020a7c04 (diff) | |
| download | gcc-58ebaaf1882529ce8acf12add37e4df66d876f3e.zip gcc-58ebaaf1882529ce8acf12add37e4df66d876f3e.tar.gz gcc-58ebaaf1882529ce8acf12add37e4df66d876f3e.tar.bz2 | |
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
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/char_initialiser_actual.f90 | 3 |
2 files changed, 8 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index e67254d..a63ed7c 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +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. diff --git a/gcc/testsuite/gfortran.dg/char_initialiser_actual.f90 b/gcc/testsuite/gfortran.dg/char_initialiser_actual.f90 index d123aca..dbd7890 100644 --- a/gcc/testsuite/gfortran.dg/char_initialiser_actual.f90 +++ b/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 |