diff options
author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2009-01-05 22:57:30 +0000 |
---|---|---|
committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2009-01-05 22:57:30 +0000 |
commit | d36e4306a0f3ddbe19c7cb4263d987d150936cda (patch) | |
tree | 4ad566befe5536a7ee11a79287695a5303bc3d03 /gcc | |
parent | 8217a6359fd750fcfee58f796b388b3d736e60bf (diff) | |
download | gcc-d36e4306a0f3ddbe19c7cb4263d987d150936cda.zip gcc-d36e4306a0f3ddbe19c7cb4263d987d150936cda.tar.gz gcc-d36e4306a0f3ddbe19c7cb4263d987d150936cda.tar.bz2 |
re PR libfortran/38735 ([4.4 Regresssion] Default BLANK= mode for internal units is wrong)
2009-01-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libfortran/38735
* gfortran.dg/fmt_bz_bn.f: Update test.
From-SVN: r143103
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/fmt_bz_bn.f | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index f401ff5..9e7d658 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2009-01-05 Jerry DeLisle <jvdelisle@gcc.gnu.org> + + PR libfortran/38735 + * gfortran.dg/fmt_bz_bn.f: Update test. + 2009-01-05 Dodji Seketeli <dodji@redhat.com> PR c++/38472 diff --git a/gcc/testsuite/gfortran.dg/fmt_bz_bn.f b/gcc/testsuite/gfortran.dg/fmt_bz_bn.f index b4a1ac3..b24ebab 100644 --- a/gcc/testsuite/gfortran.dg/fmt_bz_bn.f +++ b/gcc/testsuite/gfortran.dg/fmt_bz_bn.f @@ -17,7 +17,7 @@ c Test case derived from reporter. if (f .ne. 2003.0) call abort f = 0.0 read (c,'(E11.0)') f - if (f .ne. 2.0020) call abort + if (f .ne. 20.020) call abort f = 0.0 read (c,'(BZ,E11.0)') f if (f .ne. 2.002e10) call abort |