re PR fortran/31203 ([4.1/4.2 only] Character length should never be negative)
authorFrancois-Xavier Coudert <coudert@clipper.ens.fr>
Mon, 19 Mar 2007 08:13:30 +0000 (09:13 +0100)
committerFrançois-Xavier Coudert <fxcoudert@gcc.gnu.org>
Mon, 19 Mar 2007 08:13:30 +0000 (08:13 +0000)
commit886c8de1939d8028f3568d7f586468d6f796153c
tree203824e06002e0907a7765058ac5465595c78f58
parentfd975604c284f72025d34d35e97fa157b1bd451b
re PR fortran/31203 ([4.1/4.2 only] Character length should never be negative)

PR fortran/31203

* trans-expr.c (gfc_trans_init_string_length): Length should
never be negative.
(gfc_conv_function_call): Likewise.

* gfortran.dg/string_length_1.f90: New test.

From-SVN: r123051
gcc/fortran/ChangeLog
gcc/fortran/trans-expr.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/string_length_1.f90 [new file with mode: 0644]