Message ID | 5C6724D5.9080809@gmx.de |
---|---|
State | New |
Headers | show |
Series | [PR,fortran/89077,part,3] - ICE using * as len specifier for character parameter | expand |
Hi Harald,
> OK for trunk?
OK.
Thanks for the patch!
Regards
Thomas
Committed as rev. 268973. Thanks for the review! Harald On 02/17/19 21:45, Thomas Koenig wrote: > Hi Harald, > >> OK for trunk? > > OK. > > Thanks for the patch! > > Regards > > Thomas >
Index: gcc/fortran/decl.c =================================================================== --- gcc/fortran/decl.c (revision 268946) +++ gcc/fortran/decl.c (working copy) @@ -1754,6 +1754,14 @@ free (expr->value.character.string); expr->value.character.string = s; expr->value.character.length = len; + /* If explicit representation was given, clear it + as it is no longer needed after padding. */ + if (expr->representation.length) + { + expr->representation.length = 0; + free (expr->representation.string); + expr->representation.string = NULL; + } } }