2005-12-17 Steven G. Kargl <kargls@comcast.net>

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / fmt_read_bz_bn.f90

diff --git a/gcc/testsuite/gfortran.dg/fmt_read_bz_bn.f90 b/gcc/testsuite/gfortran.dg/fmt_read_bz_bn.f90
index aea1561..5cda4bb 100644 (file)
--- a/gcc/testsuite/gfortran.dg/fmt_read_bz_bn.f90
+++ b/gcc/testsuite/gfortran.dg/fmt_read_bz_bn.f90
@@ -6,7 +6,7 @@ program test_bn
         
 integer I1(2,2), I2(2,2,2)
 real A1(5)
-real*8 A2(0:3)
+real(kind=8) A2(0:3)
 character*80 :: IDATA1="111 2 2 3 3. 3E-1  44 5 5 6 . 67 . 78 8. 8E-1"
 character*80 :: IDATA2="2345 1 34512 45123 51234 2345 1 34512 45123 5"
 character*80 :: IDATA3="-8.0D0  1.0D-4  0.50D0  0.250D0"