diff options
| author | Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de> | 2004-06-12 15:15:41 +0000 |
|---|---|---|
| committer | Paul Brook <pbrook@gcc.gnu.org> | 2004-06-12 15:15:41 +0000 |
| commit | f814193b9d8f34c0c344f734d66aae2a032dddc8 (patch) | |
| tree | ac3e2ce34e6c91771d864045d6f31c5996381afb /libgfortran/libgfortran.h | |
| parent | c52eae8de072141afe6620df1ccd2803f86771ff (diff) | |
| download | gcc-f814193b9d8f34c0c344f734d66aae2a032dddc8.zip gcc-f814193b9d8f34c0c344f734d66aae2a032dddc8.tar.gz gcc-f814193b9d8f34c0c344f734d66aae2a032dddc8.tar.bz2 | |
re PR libfortran/14923 (gfortran misses the DATE_AND_TIME intrinsic)
PR fortran/14923
* intrinsics/date_and_time.c: New file.
* Makefile.am (gfor_helper_src): Add intrinsics/date_and_time.c.
* Makefile.in, aclocal.m4: Regenerate.
* libgfortran.h: Prototype date_and_time().
testsuite/
* gfortran.fortran-torture/execute/date_time_1.f90: New test.
Co-Authored-By: Steven Bosscher <stevenb@suse.de>
From-SVN: r83032
Diffstat (limited to 'libgfortran/libgfortran.h')
| -rw-r--r-- | libgfortran/libgfortran.h | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h index a4c2759..4eba606 100644 --- a/libgfortran/libgfortran.h +++ b/libgfortran/libgfortran.h @@ -390,6 +390,12 @@ void internal_unpack_4 (gfc_array_i4 *, const GFC_INTEGER_4 *); #define internal_unpack_8 prefix(internal_unpack_8) void internal_unpack_8 (gfc_array_i8 *, const GFC_INTEGER_8 *); +/* date_and_time.c */ + +#define date_and_time prefix(date_and_time) +void date_and_time (char *, char *, char *, gfc_array_i4 *, + GFC_INTEGER_4, GFC_INTEGER_4, GFC_INTEGER_4); + /* string_intrinsics.c */ #define compare_string prefix(compare_string) |