From 0274cf27fd787aa97935a1c0c15b369bd99390e3 Mon Sep 17 00:00:00 2001 From: Simon Baldwin Date: Tue, 20 Sep 2011 13:19:23 +0000 Subject: [PATCH] module.c (gfc_dump_module): Omit timestamp from output. 2011-09-16 Simon Baldwin * module.c (gfc_dump_module): Omit timestamp from output. From-SVN: r179007 --- gcc/fortran/ChangeLog | 4 ++++ gcc/fortran/module.c | 12 +++--------- 2 files changed, 7 insertions(+), 9 deletions(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index acd99edd497..acb339b15f3 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2011-09-20 Simon Baldwin + + * module.c (gfc_dump_module): Omit timestamp from output. + 2011-09-17 Janus Weil PR fortran/50403 diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index 4250a170a92..b29ba4b66ee 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -5178,8 +5178,7 @@ void gfc_dump_module (const char *name, int dump_flag) { int n; - char *filename, *filename_tmp, *p; - time_t now; + char *filename, *filename_tmp; fpos_t md5_pos; unsigned char md5_new[16], md5_old[16]; @@ -5221,13 +5220,8 @@ gfc_dump_module (const char *name, int dump_flag) filename_tmp, xstrerror (errno)); /* Write the header, including space reserved for the MD5 sum. */ - now = time (NULL); - p = ctime (&now); - - *strchr (p, '\n') = '\0'; - - fprintf (module_fp, "GFORTRAN module version '%s' created from %s on %s\n" - "MD5:", MOD_VERSION, gfc_source_file, p); + fprintf (module_fp, "GFORTRAN module version '%s' created from %s\n" + "MD5:", MOD_VERSION, gfc_source_file); fgetpos (module_fp, &md5_pos); fputs ("00000000000000000000000000000000 -- " "If you edit this, you'll get what you deserve.\n\n", module_fp); -- 2.30.2