diff options
Diffstat (limited to 'libgfortran/intrinsics/dtime.c')
| -rw-r--r-- | libgfortran/intrinsics/dtime.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libgfortran/intrinsics/dtime.c b/libgfortran/intrinsics/dtime.c index e36e1f1d04a..b5dc91ea067 100644 --- a/libgfortran/intrinsics/dtime.c +++ b/libgfortran/intrinsics/dtime.c @@ -1,6 +1,6 @@ /* Implementation of the dtime intrinsic. - Copyright (C) 2004, 2005, 2006, 2007, 2009, 2011 Free Software - Foundation, Inc. + Copyright (C) 2004, 2005, 2006, 2007, 2009, 2011, 2012 + Free Software Foundation, Inc. This file is part of the GNU Fortran runtime library (libgfortran). @@ -65,7 +65,7 @@ dtime_sub (gfc_array_r4 *t, GFC_REAL_4 *result) tt = -1; } - tp = t->data; + tp = t->base_addr; *tp = tu; tp += GFC_DESCRIPTOR_STRIDE(t,0); |