]> git.ipfire.org Git - thirdparty/gcc.git/commit
projects / thirdparty / gcc.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 329fdf8) | patch
PR fortran/31203
authorfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 19 Mar 2007 08:13:30 +0000 (08:13 +0000)
committerfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 19 Mar 2007 08:13:30 +0000 (08:13 +0000)
commita0ab480af081b8862c37028c48fc6bf23a15234d
tree203824e06002e0907a7765058ac5465595c78f58tree
parent329fdf8ad859b51ea54a135a38f965ecd49582a5commit | diff
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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@123051 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog diff | blob | blame | history
gcc/fortran/trans-expr.c diff | blob | blame | history
gcc/testsuite/ChangeLog diff | blob | blame | history
gcc/testsuite/gfortran.dg/string_length_1.f90 [new file with mode: 0644] blob
Mirror of https://gcc.gnu.org/git/gcc.git