summaryrefslogtreecommitdiffstats
path: root/src/H5Fcontig.c
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>2003-06-30 15:53:02 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>2003-06-30 15:53:02 (GMT)
commit87a5f6480cbf866b1a72de7092dac9cca6e0ef2c (patch)
treee514487f5500c93ba7b262a42f327375c7821ab4 /src/H5Fcontig.c
parent007affb6dfc894e2e81a90ae7790473ff6dc26b0 (diff)
downloadhdf5-87a5f6480cbf866b1a72de7092dac9cca6e0ef2c.zip
hdf5-87a5f6480cbf866b1a72de7092dac9cca6e0ef2c.tar.gz
hdf5-87a5f6480cbf866b1a72de7092dac9cca6e0ef2c.tar.bz2
[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.
Diffstat (limited to 'src/H5Fcontig.c')
-rw-r--r--src/H5Fcontig.c5
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;