diff options
Diffstat (limited to 'src/Write.c')
| -rw-r--r-- | src/Write.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Write.c b/src/Write.c index 18abe0e..3117170 100644 --- a/src/Write.c +++ b/src/Write.c @@ -123,8 +123,10 @@ void IOBasic_Write (cGH *GH, int vindex, const char *alias) /* write the file info and the header */ CCTK_ParameterFilename (sizeof (buffer), buffer); fprintf (file, "%cParameter file %s\n", comment_char, buffer); + Util_CurrentDate (sizeof (buffer), buffer); + fprintf (file, "%cCreated %s ", comment_char, buffer); Util_CurrentTime (sizeof (buffer), buffer); - fprintf (file, "%cCreated %s\n", comment_char, buffer); + fprintf (file, "%s\n", buffer); fprintf (file, "%cx-label time\n", comment_char); fprintf (file, "%cy-label %s\n", comment_char, advertised_file.varname); fprintf (file, "%c%s v time\n", comment_char, alias); |