diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2018-06-10 03:10:00 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2018-06-10 03:10:00 +0000 |
| commit | e09a6f7afe9a8a95023c1f512e6746ff3c92fe6a (patch) | |
| tree | c6681f5b9220daeda1cae0b5e19f6ceb97cc1cde | |
| parent | ae969bc6eef38a0828f510c87c030324027b29e2 (diff) | |
2018-06-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
Backport from trunk.
PR libgfortran/86070
* io/write_float.def (build_float_string): Initialize *len.
git-svn-id: https://gcc.gnu.org/svn/gcc/branches/gcc-7-branch@261384 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | libgfortran/ChangeLog | 5 | ||||
| -rw-r--r-- | libgfortran/io/write_float.def | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 7cda6b4c8bd..403cb82c942 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,8 @@ +2018-06-09 Jerry DeLisle <jvdelisle@gcc.gnu.org> + + PR libgfortran/86070 + * io/write_float.def (build_float_string): Initialize *len. + 2018-06-01 Jerry DeLisle <jvdelisle@gcc.gnu.org> Backport from trunk. diff --git a/libgfortran/io/write_float.def b/libgfortran/io/write_float.def index 7f0aa1d6143..b4971fd335e 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'; |