[Dart-dev] [4206] DART/trunk/preprocess/preprocess.f90: The start of replacing the call to timestamp with a call

[nancy at ucar.edu]

Revision: 4206
Author:   nancy
Date:     2009-12-18 13:26:05 -0700 (Fri, 18 Dec 2009)
Log Message:
-----------
The start of replacing the call to timestamp with a call
to finalize_utilities.

Modified Paths:
--------------
    DART/trunk/preprocess/preprocess.f90

-------------- next part --------------
Modified: DART/trunk/preprocess/preprocess.f90
===================================================================
--- DART/trunk/preprocess/preprocess.f90	2009-12-18 20:25:17 UTC (rev 4205)
+++ DART/trunk/preprocess/preprocess.f90	2009-12-18 20:26:05 UTC (rev 4206)
@@ -27,7 +27,8 @@
 use utilities_mod, only : register_module, error_handler, E_ERR, E_MSG,   &
                           file_exist, open_file, logfileunit, timestamp,  &
                           initialize_utilities, do_nml_file, do_nml_term, &
-                          find_namelist_in_file, check_namelist_read
+                          find_namelist_in_file, check_namelist_read,     &
+                          finalize_utilities
 
 implicit none
 
@@ -706,7 +707,7 @@
 !______________________________________________________________________________
 
 
-call timestamp(source,revision,revdate,'end') ! closes the log file.
+call finalize_utilities('preprocess')
 
 contains