From 3a579cbe0781a62146c4ddf430ae0e40c3f75f0f Mon Sep 17 00:00:00 2001 From: Jerry DeLisle Date: Sun, 10 Jun 2018 01:49:02 +0000 Subject: [PATCH] re PR libfortran/86070 (gfortran.dg/fmt_zero_digits.f90 segmentation fault starting with r261077) 2018-06-09 Jerry DeLisle PR libgfortran/86070 * io/write_float.def (build_float_string): Initialize *len. From-SVN: r261382 --- libgfortran/ChangeLog | 5 +++++ libgfortran/io/write_float.def | 1 + 2 files changed, 6 insertions(+) diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 4e9c5c7c7a4..dbfc5d35342 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,8 @@ +2018-06-09 Jerry DeLisle + + PR libgfortran/86070 + * io/write_float.def (build_float_string): Initialize *len. + 2018-06-01 Steven G. Kargl PR fortran/85816 diff --git a/libgfortran/io/write_float.def b/libgfortran/io/write_float.def index 177a568e041..25ea64beb21 100644 --- a/libgfortran/io/write_float.def +++ b/libgfortran/io/write_float.def @@ -135,6 +135,7 @@ build_float_string (st_parameter_dt *dtp, const fnode *f, char *buffer, w = f->u.real.w; d = f->u.real.d; p = dtp->u.p.scale_factor; + *len = 0; rchar = '5'; -- 2.30.2