This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
[libgfortran] Some minor fix-ups committed
- From: Jerry DeLisle <jvdelisle at charter dot net>
- To: gfortran <fortran at gcc dot gnu dot org>
- Cc: gcc patches <gcc-patches at gcc dot gnu dot org>
- Date: Mon, 20 Jan 2014 18:50:24 -0800
- Subject: [libgfortran] Some minor fix-ups committed
- Authentication-results: sourceware.org; auth=none
I have committed for Dominiq some followup minor cleanup.
Index: io/write_float.def
===================================================================
--- io/write_float.def (revision 206864)
+++ io/write_float.def (working copy)
@@ -373,7 +373,7 @@
updown:
rchar = '0';
- if (ft != FMT_F && nbefore == 0 && w > 0 && d == 0 && p == 0)
+ if (ft != FMT_F && w > 0 && d == 0 && p == 0)
nbefore = 1;
/* Scan for trailing zeros to see if we really need to round it. */
for(i = nbefore + nafter; i < ndigits; i++)
@@ -389,7 +389,7 @@
/* Handle the case Fw.0 and value < 1.0 */
{
ndigits = 0;
- if (nzero_real == d && digits[0] >= rchar)
+ if (digits[0] >= rchar)
{
/* We rounded to zero but shouldn't have */
nbefore = 1;
Remove some test code:
Sending ChangeLog
Sending io/write_float.def
Transmitting file data ..
Committed revision 206865.
Some more test cases:
Sending ChangeLog
Sending gfortran.dg/round_3.f08
Transmitting file data ..
Committed revision 206866.
Regards,
Jerry