* libgfortran/io/write.c (output_float): fix typo in last commit.

From-SVN: r96958

* libgfortran/io/write.c (output_float): fix typo in last commit.
From-SVN: r96958
85624ffd · François-Xavier Coudert · 0b694555 · 85624ffd
Commit 85624ffd authored Mar 23, 2005 by François-Xavier Coudert
Hide whitespace changes
Inline Side-by-side

Showing with 1 additions and 1 deletions

libgfortran/io/write.c
+1 -1

No files found.
--- a/libgfortran/io/write.c
+++ b/libgfortran/io/write.c
@@ -537,7 +537,7 @@ output_float (fnode *f, double value, int len)

  /* Pick a field size if none was specified.  */
  if (w <= 0)
-    w = nbefore + nzero + nafter + (sign != SIGN_NONE ? 2 : 1)
+    w = nbefore + nzero + nafter + (sign != SIGN_NONE ? 2 : 1);

  /* Create the ouput buffer.  */
  out = write_block (w);