From 848eab5c43de5cc6f60263a1ba76d740fbeb5318 Mon Sep 17 00:00:00 2001 From: Janne Blomqvist Date: Fri, 29 Apr 2011 19:06:48 +0300 Subject: [PATCH] PR 48488 Typo From-SVN: r173171 --- 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 bfc24633e7a..95eec84edcb 100644 --- a/libgfortran/io/write.c +++ b/libgfortran/io/write.c @@ -1458,7 +1458,7 @@ set_fnode_default (st_parameter_dt *dtp, fnode *f, int length) } /* Output a real number with default format. To guarantee that a - binary -> decimal -> binary rountrip conversion recovers the + binary -> decimal -> binary roundtrip conversion recovers the original value, IEEE 754-2008 requires 9, 17, 21 and 36 significant digits for REAL kinds 4, 8, 10, and 16, respectively. Thus, we use 1PG16.9E2 for REAL(4), 1PG25.17E3 for REAL(8), 1PG30.21E4 for -- 2.30.2