OSDN Git Service

PR libfortran/20755
authorfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 5 Apr 2005 14:20:10 +0000 (14:20 +0000)
committerfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 5 Apr 2005 14:20:10 +0000 (14:20 +0000)
commit796e5f20b61e2b5217c3bd10df4041ee5707bd0f
treef31db877f1ff6847fae7b39c30d10d28a04bed21
parent4a5c037c49615199368744b96f399ca51f54c539
PR libfortran/20755
* write.c (write_float): A G edit descriptor may locally change
the scale factor, but it needs to be restored afterwards.

* gfortran.dg/pr20755.f: New test.

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