| commit | 230c8f37647b09bd1bf8b35cc35e3d93a71fb5a2 | |
| author | pault <pault@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Sun, 18 Nov 2007 17:14:40 +0000 (18 17:14 +0000) | ||
| committer | pault <pault@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Sun, 18 Nov 2007 17:14:40 +0000 (18 17:14 +0000) | ||
| tree | 742fad5e58bb710c4972a11291e8b6bfb579fe21 | treesnapshot (tar.gz zip) |
| parent | f86aea04aa5f5adb151473c738f2827ec52665c7 | commitdiff |
2007-11-18 Paul Thomas <pault@gcc.gnu.org>
PR fortran/31608
* trans-array.c (gfc_conv_expr_descriptor): Remove exception
for indirect references in the call to gfc_trans_scalar_assign.
* trans-expr.c (gfc_conv_string_parameter): Instead of asserting
that the expression is not an indirect reference, cast it to a
pointer type of the length given by se->string_length.
2007-11-18 Paul Thomas <pault@gcc.gnu.org>
PR fortran/31608
* gfortran.dg/char_cast_2.f90: New test based on achar_4.f90.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@130271 138bc75d-0d04-0410-961f-82ee72b054a4
PR fortran/31608
* trans-array.c (gfc_conv_expr_descriptor): Remove exception
for indirect references in the call to gfc_trans_scalar_assign.
* trans-expr.c (gfc_conv_string_parameter): Instead of asserting
that the expression is not an indirect reference, cast it to a
pointer type of the length given by se->string_length.
2007-11-18 Paul Thomas <pault@gcc.gnu.org>
PR fortran/31608
* gfortran.dg/char_cast_2.f90: New test based on achar_4.f90.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@130271 138bc75d-0d04-0410-961f-82ee72b054a4