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

Reply via email to