libgfortran/io · 766ff1b11748f66da98c901b9498a90e72698c05 · lvzhengyang / riscv-gcc-1

re PR libfortran/17195 (Infinite loop in output_float in libgfortran/io/write.c) · 7984a2f0

	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.

From-SVN: r86701

committed Aug 28, 2004

7984a2f0

Name	Last commit	Last update
..
backspace.c		Loading commit data...
close.c		Loading commit data...
endfile.c		Loading commit data...
format.c		Loading commit data...
inquire.c		Loading commit data...
io.h		Loading commit data...
list_read.c		Loading commit data...
lock.c		Loading commit data...
open.c		Loading commit data...
read.c		Loading commit data...
rewind.c		Loading commit data...
transfer.c		Loading commit data...
unit.c		Loading commit data...
unix.c		Loading commit data...
write.c		Loading commit data...