OSDN Git Service

PR libfortran/17195
authorpbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 28 Aug 2004 19:48:02 +0000 (19:48 +0000)
committerpbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 28 Aug 2004 19:48:02 +0000 (19:48 +0000)
commita2784d66a1b5767f47ec8d93f97cc73008af89c3
tree0371510fa89dbbdbb79289c112c2ac3536729a99
parent25696d3f4c3e989d1ee68b70e567ce5fd21ee7c0
PR libfortran/17195
* libgfortran.h (rtoa): Remove prototype.
* runtime/error.c (rtoa): Remove.
* io/write.c (calculate_G_format): Don't add blanks if E format is
used.  Add correct number of blanks when exponent width is specified.
(output_float): Rewrite.
testsuite/
* gfortran.dg/edit_real_1.f90: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86701 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/edit_real_1.f90 [new file with mode: 0644]
libgfortran/ChangeLog
libgfortran/io/write.c
libgfortran/libgfortran.h
libgfortran/runtime/error.c