From 95b49c6f9d7e0ad2e80ba67ce2ca04b6a4c2648b Mon Sep 17 00:00:00 2001 From: "Steven G. Kargl" Date: Mon, 21 Feb 2005 19:59:58 +0000 Subject: [PATCH] * io/write.c(output_float): Typo in error message. From-SVN: r95343 --- libgfortran/ChangeLog | 4 ++++ libgfortran/io/write.c | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog index 4aa4077b441..de81b000ad9 100644 --- a/libgfortran/ChangeLog +++ b/libgfortran/ChangeLog @@ -1,3 +1,7 @@ +2005-02-21 Steven G. Kargl + + * io/write.c (output_float): Typo in error meesage. + 2005-02-20 Steven G. Kargl PR 20085 diff --git a/libgfortran/io/write.c b/libgfortran/io/write.c index 403b9afe322..19744d294c0 100644 --- a/libgfortran/io/write.c +++ b/libgfortran/io/write.c @@ -297,7 +297,7 @@ output_float (fnode *f, double value, int len) /* We should always know the field width and precision. */ if (d < 0) - internal_error ("Uspecified precision"); + internal_error ("Unspecified precision"); /* Use sprintf to print the number in the format +D.DDDDe+ddd For an N digit exponent, this gives us (32-6)-N digits after the -- 2.30.2