From cba83c6f794f7282133f08ae68908c3b5b414d20 Mon Sep 17 00:00:00 2001 From: Paul Thomas Date: Thu, 31 May 2007 21:11:31 +0000 Subject: [PATCH] re PR fortran/32156 (ICE with characters) 2007-05-31 Paul Thomas PR fortran/32156 * trans-array.c (gfc_trans_array_constructor): Treat the case where the ss expression charlen is missing. 2007-05-31 Paul Thomas PR fortran/32156 * gfortran.dg/char_array_constructor_3.f90: New test. From-SVN: r125240 --- gcc/fortran/ChangeLog | 6 ++++++ gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/char_array_constructor_3.f90 | 8 ++++++++ 3 files changed, 19 insertions(+) create mode 100644 gcc/testsuite/gfortran.dg/char_array_constructor_3.f90 diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 1f60b34..025471e 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,11 @@ 2007-05-31 Paul Thomas + PR fortran/32156 + * trans-array.c (gfc_trans_array_constructor): Treat the case + where the ss expression charlen is missing. + +22007-05-31 Paul Thomas + PR fortran/32103 * module.c (mio_symtree_ref): If an equivalence group member is not used, give it a hidden symbol and set the pointer_info. diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 86e6766..f659b4b 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +007-05-31 Paul Thomas + + PR fortran/32156 + * gfortran.dg/char_array_constructor_3.f90: New test. + 2007-05-31 Zdenek Dvorak PR tree-optimization/32160 diff --git a/gcc/testsuite/gfortran.dg/char_array_constructor_3.f90 b/gcc/testsuite/gfortran.dg/char_array_constructor_3.f90 new file mode 100644 index 0000000..d4c4964 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/char_array_constructor_3.f90 @@ -0,0 +1,8 @@ +! { dg-do compile } +! tests the fix for PR32156, in which the character length of the compound +! expression got lost. +! +! Contributed by Tobias Burnus +! +write (*,'(2A3)') 'X'//(/"1","2"/)//'Y' +END -- 2.7.4