[svn-r2057] Purpose:

    Bug fix for parallel mode.
Description:
    H5FD_mpio_tas_allsame was called for all cases, even when
    MPIO is not used for access.  That corrupted the internal
    file handle structure.
Solution:
    Define a macro, IS_H5FD_MPIO(f), for testing if f is opened with
    MPIO access.  Will call H5FD_mpio_tas_allsame only if this
    condition is true.
Platform tested:
    O2K, both -64 and -n32 modes.

1 files changed, 1 insertions, 0 deletions

diff --git a/src/H5FDmpio.c b/src/H5FDmpio.c
index 7cac7f3..89dd768 100644
--- a/src/H5FDmpio.c
+++ b/src/H5FDmpio.c
@@ -424,6 +424,7 @@ H5FD_mpio_tas_allsame(H5FD_t *_file, hbool_t newval)
 #endif
 
     assert(file);
+    assert(H5FD_MPIO==file->pub.driver_id);
     oldval = file->allsame;
     file->allsame = newval;