Commit 8e71a206 by Jerry DeLisle

re PR libfortran/48047 (Incorrect output rounding of double precision numbers)

2011-03-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libgfortran/48047
	* io/write_float.def (write_float): Change MIN_FIELD_WIDTH to 48.

From-SVN: r170895
parent 548c4e2b
2011-03-11 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/48047
* io/write_float.def (write_float): Change MIN_FIELD_WIDTH to 48.
2011-03-04 Janne Blomqvist <jb@gcc.gnu.org> 2011-03-04 Janne Blomqvist <jb@gcc.gnu.org>
PR libfortran/47802 PR libfortran/47802
......
...@@ -1020,7 +1020,7 @@ write_float (st_parameter_dt *dtp, const fnode *f, const char *source, int len) ...@@ -1020,7 +1020,7 @@ write_float (st_parameter_dt *dtp, const fnode *f, const char *source, int len)
{ {
#if defined(HAVE_GFC_REAL_16) || __LDBL_DIG__ > 18 #if defined(HAVE_GFC_REAL_16) || __LDBL_DIG__ > 18
# define MIN_FIELD_WIDTH 46 # define MIN_FIELD_WIDTH 48
#else #else
# define MIN_FIELD_WIDTH 31 # define MIN_FIELD_WIDTH 31
#endif #endif
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment