[fortran,patch] Fix PR35937, give function result string length the right type

[FX]

Attached patch fixes one corner-case where we used to give a wrong
type to a character function result length. I'd appreciate if someone
who understands the mapping functions in trans-expr.c could review
this one to tell me if this is the fix looks right or if there is a
better, more specific way of handling that issue.

Boostrapped and regtested on x86_64-linux, comes with a testcase from
the PR. OK to commit?

FX

-- 
FX Coudert
http://www.homepages.ucl.ac.uk/~uccafco/
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr35937.ChangeLog
Type: application/octet-stream
Size: 292 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20080512/b3ab3d78/attachment.obj>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr35937.diff
Type: application/octet-stream
Size: 1877 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20080512/b3ab3d78/attachment-0001.obj>