[patch, fortran] Fix PR 34145, single char detection

[Thomas Koenig]

Hello world,

the attached patch fixes PR 34145, where we failed to detect that a
string was in fact a single character.

Regression-tested.

OK for trunk?

	Thomas

2010-09-05  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/34145
	* trans-expr.c (gfc_conv_substring):  If start and end
	of the string reference are equal, set the length to one.

2010-09-05  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/34145
	* char_length_17.f90:  New test.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: p1.diff
Type: text/x-patch
Size: 1282 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20100905/208e92e3/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: char_length_17.f90
Type: text/x-fortran
Size: 502 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20100905/208e92e3/attachment-0001.bin>