mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2024-11-27 02:10:55 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r4732]

Browse Source 
Purpose:
	Bug Fix
Description:
	Committing the changes in the MPI/IO stuff so that parallel HDF5
	will work on HP-UX. It seems that on HP-UX, the MPI_Status variable
	needs to be initialized to 0 for it to work (i.e., in some other MPI
	calls, if there's garbage in the MPI_Status variable, then it will
	barf).
Solution:
	Initialized to 0.
Platforms tested:
	HP-UX parallel, Linux.
This commit is contained in:
Bill Wendling 2001-12-18 13:35:23 -05:00
parent ad04fdd3a7
commit 2b629eaceb
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/H5FDmpio.c
View File

@ -1091,7 +1091,7 @@ H5FD_mpio_read(H5FD_t *_file, H5FD_mem_t UNUSED type, hid_t dxpl_id, haddr_t add
const H5FD_mpio_dxpl_t *dx=NULL;
H5FD_mpio_dxpl_t _dx;
MPI_Offset mpi_off, mpi_disp;
MPI_Status mpi_stat;
MPI_Status mpi_stat = {0};
MPI_Datatype buf_type, file_type;
int size_i, bytes_read, n;
int use_types_this_time, used_types_last_time;
@ -1347,7 +1347,7 @@ H5FD_mpio_write(H5FD_t *_file, H5FD_mem_t UNUSED type, hid_t dxpl_id, haddr_t ad
const H5FD_mpio_dxpl_t *dx=NULL;
H5FD_mpio_dxpl_t _dx;
MPI_Offset mpi_off, mpi_disp;
MPI_Status mpi_stat;
MPI_Status mpi_stat = {0};
MPI_Datatype buf_type, file_type;
int size_i, bytes_written;
int mpi_rank=-1;
@ -1552,7 +1552,7 @@ H5FD_mpio_flush(H5FD_t *_file)
H5FD_mpio_t *file = (H5FD_mpio_t*)_file;
int mpi_rank=-1;
uint8_t byte=0;
MPI_Status mpi_stat;
MPI_Status mpi_stat = {0};
MPI_Offset mpi_off;
FUNC_ENTER(H5FD_mpio_flush, FAIL);