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

gcc/testsuite/ChangeLog

+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

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