* gfortran.dg/secnds.f: Use real*8.
* gfortran.dg/secnds-1.f: Use real*8.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@124255
138bc75d-0d04-0410-961f-
82ee72b054a4
-2007-04-27 Jerry DeLisle
+2007-04-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>
+
+ * gfortran.dg/secnds.f: Use real*8.
+ * gfortran.dg/secnds-1.f: Use real*8.
+
+2007-04-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libfortran/31532
* gfortran.dg/inquire_5.f90: Update test.
C
character*20 dum1, dum2, dum3
real t1, t1a, t2, t2a
- real dat1, dat2
+ real*8 dat1, dat2
integer i, j, values(8)
t1 = secnds (0.0)
call date_and_time (dum1, dum2, dum3, values)
C
character*20 dum1, dum2, dum3
real t1, t1a, t2, t2a
- real dat1, dat2
+ real*8 dat1, dat2
integer i, j, values(8)
t1 = secnds (0.0)
call date_and_time (dum1, dum2, dum3, values)