r176961 - in /trunk/gcc: fortran/ChangeLog fort...

[tkoenig@gcc.gnu.org]

Author: tkoenig
Date: Sat Jul 30 18:17:55 2011
New Revision: 176961

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=176961
Log:
2011-07-30  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/48876
	* expr.c (gfc_simplify_expr):  If end of a string is less
	than zero, set it to zero.

2011-07-30  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/48876
	* gfortran.dg/string_5.f90:  New test.


Added:
    trunk/gcc/testsuite/gfortran.dg/string_5.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/expr.c
    trunk/gcc/testsuite/ChangeLog