PR fortran/25587
* trans-io.c (gfc_build_st_parameter): Correct off by one error.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@109120
138bc75d-0d04-0410-961f-
82ee72b054a4
+2005-12-28 Andrew Pinski <pinskia@physics.uc.edu>
+
+ PR fortran/25587
+ * trans-io.c (gfc_build_st_parameter): Correct off by one error.
+
2005-12-28 Rafael Ávila de Espíndola <rafael.espindola@gmail.com>
* Make-lang.in: Remove distdir from comment.
gcc_assert (len <= sizeof (name) - sizeof ("__st_parameter_"));
memcpy (name, "__st_parameter_", sizeof ("__st_parameter_"));
memcpy (name + sizeof ("__st_parameter_") - 1, st_parameter[ptype].name,
- len);
+ len + 1);
TYPE_NAME (t) = get_identifier (name);
for (type = 0, p = st_parameter_field; type < IOPARM_field_num; type++, p++)