[Dart-dev] [5670] DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90: no code change; correct a couple comments in the null version

nancy at ucar.edu nancy at ucar.edu
Mon Apr 9 10:08:21 MDT 2012


Revision: 5670
Author:   nancy
Date:     2012-04-09 10:08:21 -0600 (Mon, 09 Apr 2012)
Log Message:
-----------
no code change; correct a couple comments in the null version
to be more helpful.  the null version of this code does no
communication because you only have 1 task.

Modified Paths:
--------------
    DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90

-------------- next part --------------
Modified: DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90
===================================================================
--- DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90	2012-04-09 15:17:03 UTC (rev 5669)
+++ DART/branches/development/mpi_utilities/null_mpi_utilities_mod.f90	2012-04-09 16:08:21 UTC (rev 5670)
@@ -516,9 +516,8 @@
    call error_handler(E_ERR,'broadcast_send', errstring, source, revision, revdate)
 endif
 
-! this must be paired with broadcast_recv() on all other tasks. 
-! it will not return until all tasks in the communications group have
-! made the call.
+! this does nothing, because the array already has the data.
+! the subroutine does validate 'from' to be sure it's a valid task id.
 call array_broadcast(array1, from)
 
 end subroutine broadcast_send
@@ -546,9 +545,8 @@
    call error_handler(E_ERR,'broadcast_recv', errstring, source, revision, revdate)
 endif
 
-! this must be paired with a single broadcast_send() on the 'from' task.
-! it will not return until all tasks in the communications group have
-! made the call.
+! this does nothing, because the array already has the data.
+! the subroutine does validate 'from' to be sure it's a valid task id.
 call array_broadcast(array1, from)
 
 end subroutine broadcast_recv


More information about the Dart-dev mailing list