This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
[patch, libfortran] PR39402 write of 0.0 with F0.3 gives **
- From: Jerry DeLisle <jvdelisle at verizon dot net>
- To: Fortran List <fortran at gcc dot gnu dot org>
- Cc: gcc-patches <gcc-patches at gcc dot gnu dot org>
- Date: Sun, 08 Mar 2009 22:00:57 -0700
- Subject: [patch, libfortran] PR39402 write of 0.0 with F0.3 gives **
The following patch was committed after regression testing and NIST
testing. It is a limited special case, simple, and obvious. New test
case also provided.
$ svn commit ChangeLog io/write_float.def
Sending ChangeLog
Sending io/write_float.def
Transmitting file data ..
Committed revision 144718.
Index: write_float.def
===================================================================
--- write_float.def (revision 144717)
+++ write_float.def (working copy)
@@ -122,7 +122,7 @@ output_float (st_parameter_dt *dtp, cons
/* Handle special cases. */
if (w == 0)
- w = 2;
+ w = d + 2;
/* For this one we choose to not output a decimal point.
F95 10.5.1.2.1 */
Best regards,
Jerry