From 90c03facaf90d41a86cc0e35281acff03dc934f9 Mon Sep 17 00:00:00 2001 From: fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> Date: Wed, 23 Mar 2005 22:31:56 +0000 Subject: [PATCH] * libgfortran/io/write.c (output_float): fix typo in last commit. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@96958 138bc75d-0d04-0410-961f-82ee72b054a4 --- libgfortran/io/write.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libgfortran/io/write.c b/libgfortran/io/write.c index d22aa344b056..556adea268ba 100644 --- 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); -- GitLab