[svn-r7122] Purpose:

    Code cleanup/Feature removal

Description:
    Remove "round robin" writing of metadata in MPI VFDs (and a couple of other
places).  This never really worked the way I hoped it would and it causes
problems on certain machines.

Platforms tested:
    FreeBSD 4.8 (sleipnir) w/parallel
    Too small for triple check.

1 files changed, 1 insertions, 4 deletions

diff --git a/src/H5Fcontig.c b/src/H5Fcontig.c
index 82ee74a..6445d19 100644
--- a/src/H5Fcontig.c
+++ b/src/H5Fcontig.c
@@ -139,7 +139,6 @@ H5F_contig_fill(H5F_t *f, hid_t dxpl_id, struct H5O_layout_t *layout,
     MPI_Comm	mpi_comm=MPI_COMM_NULL;	/* MPI communicator for file */
     int         mpi_rank=(-1);  /* This process's rank  */
     int         mpi_size=(-1);  /* Total # of processes */
-    int         mpi_round=0;    /* Current process responsible for I/O */
     int         mpi_code;       /* MPI return code */
     unsigned    blocks_written=0; /* Flag to indicate that chunk was actually written */
     unsigned    using_mpi=0;    /* Flag to indicate that the file is being accessed with an MPI-capable file driver */
@@ -266,12 +265,10 @@ H5F_contig_fill(H5F_t *f, hid_t dxpl_id, struct H5O_layout_t *layout,
             /* Check if this file is accessed with an MPI-capable file driver */
             if(using_mpi) {
                 /* Round-robin write the chunks out from only one process */
-                if(mpi_round==mpi_rank) {
+                if(H5_PAR_META_WRITE==mpi_rank) {
                     if (H5F_contig_write(f, (hsize_t)size, addr, size, dxpl_id, buf)<0)
                         HGOTO_ERROR(H5E_DATASET, H5E_CANTINIT, FAIL, "unable to write fill value to dataset");
                 } /* end if */
-                ++mpi_round;
-                mpi_round %= mpi_size;
 
                 /* Indicate that blocks are being written */
                 blocks_written=1;