[Dart-dev] DART/branches Revision: 11953

dart at ucar.edu dart at ucar.edu
Thu Sep 21 17:00:59 MDT 2017


nancy at ucar.edu
2017-09-21 17:00:59 -0600 (Thu, 21 Sep 2017)
327
in the past we've committed the gfortran version of
these files.  we often use intel these days but for
now i'm going to revert this back to the gfortran version.
(shouldn't really matter since mkmf calls fixsystem for
us now; it just shows up as a different from the repository
if you do an svn diff and you're using intel.)




Modified: DART/branches/rma_trunk/assimilation_code/modules/utilities/null_mpi_utilities_mod.f90
===================================================================
--- DART/branches/rma_trunk/assimilation_code/modules/utilities/null_mpi_utilities_mod.f90	2017-09-21 22:59:34 UTC (rev 11952)
+++ DART/branches/rma_trunk/assimilation_code/modules/utilities/null_mpi_utilities_mod.f90	2017-09-21 23:00:59 UTC (rev 11953)
@@ -46,16 +46,16 @@
 ! this directory.  It is a sed script that comments in and out the interface
 ! block below.  Please leave the BLOCK comment lines unchanged.
 
- !!SYSTEM_BLOCK_EDIT START COMMENTED_IN
- ! interface block for getting return code back from system() routine
- interface
-  function system(string)    
-   character(len=*) :: string
-   integer :: system         
-  end function system
- end interface
- ! end block                 
- !!SYSTEM_BLOCK_EDIT END COMMENTED_IN
+! !!SYSTEM_BLOCK_EDIT START COMMENTED_OUT
+! ! interface block for getting return code back from system() routine
+! interface
+!  function system(string)    
+!   character(len=*) :: string
+!   integer :: system         
+!  end function system
+! end interface
+! ! end block                 
+! !!SYSTEM_BLOCK_EDIT END COMMENTED_OUT
 
 
 interface sum_across_tasks


More information about the Dart-dev mailing list