module.c (gfc_dump_module): Omit timestamp from output.

2011-09-16  Simon Baldwin  <simonb@google.com>

	* module.c (gfc_dump_module): Omit timestamp from output.

From-SVN: r179007

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index acd99edd49782cb26bad62dc0ee2f190d4841e22..acb339b15f34c73aa76eb867e97040e4692a4625 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+2011-09-20  Simon Baldwin  <simonb@google.com>
+
+       * module.c (gfc_dump_module): Omit timestamp from output.
+
 2011-09-17  Janus Weil  <janus@gcc.gnu.org>
 
        PR fortran/50403

diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c
index 4250a170a9275c73f5ede86af7b115282db5a722..b29ba4b66ee1f4634eb457d731e34865141619cc 100644 (file)
--- 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);