mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2025-04-12 17:31:09 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r426] Fixed processing of debug string gotten from MPI_Info_get in H5F_mpio_open.

Browse Source
This commit is contained in:
Robert Kim Yates 1998-06-12 17:47:21 -05:00
parent dd58a3ec29
commit 1460b000d8
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/H5Fmpio.c
View File

@ -300,13 +300,18 @@ H5F_mpio_open(const char *name, const H5F_access_t *access_parms, uintn flags,
#ifdef H5Fmpio_DEBUG
/* Check for debug commands in the info parameter */
{ char debug_str[128];
int infoerr, str_len, flag, i;
int infoerr, flag, i;
if (access_parms->u.mpio.info) {
infoerr = MPI_Info_get( access_parms->u.mpio.info,
H5F_MPIO_DEBUG_KEY, 127, debug_str, &flag );
fprintf(stdout, "H5Fmpio debug flags=%s\n", debug_str );
for (i=0; i<str_len; ++i)
H5F_mpio_Debug[(int)debug_str[i]] = 1;
if (flag) {
fprintf(stdout, "H5Fmpio debug flags=%s\n", debug_str );
for (i=0;
debug_str[i]/*end of string*/ && i<128/*just in case*/;
++i) {
H5F_mpio_Debug[(int)debug_str[i]] = 1;
}
}
}
}
#endif