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

From-SVN: r96958

diff --git a/libgfortran/io/write.c b/libgfortran/io/write.c
index d22aa344b056159ab73eccf00406e20ee0d0319d..556adea268ba701d1fb75ff5ab4a3562e84f2e28 100644 (file)
--- 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);