HI Quing,
this is a very straightforward fix for an undefined behavior in fortran/decl.c:
> - sprintf (name, "%s_%d", name, kind_value);
> + sprintf (name + strlen (name), "_%d", kind_value);
OK for trunk. Thanks for the patch!
Regards
Thomas
