diff options
author | Paul Harten <pharten@ncsa.uiuc.edu> | 1998-04-23 23:11:06 (GMT) |
---|---|---|
committer | Paul Harten <pharten@ncsa.uiuc.edu> | 1998-04-23 23:11:06 (GMT) |
commit | 9e886e03e544dd1e747ed2ac247d9f266620179c (patch) | |
tree | aa36c11fc14b5c52c98bf75d30f346fdf3b8d5be /testpar/testphdf5.c | |
parent | 12545e32a138dee811ef73b779da52696d76393e (diff) | |
download | hdf5-9e886e03e544dd1e747ed2ac247d9f266620179c.zip hdf5-9e886e03e544dd1e747ed2ac247d9f266620179c.tar.gz hdf5-9e886e03e544dd1e747ed2ac247d9f266620179c.tar.bz2 |
[svn-r366] Purpose:
New feature
Solution:
Parallel HDF5 support on Intel TFLOPS machine using PFS file system.
Platform tested:
Intel TFLOPS (ASCI Red)
Diffstat (limited to 'testpar/testphdf5.c')
-rw-r--r-- | testpar/testphdf5.c | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/testpar/testphdf5.c b/testpar/testphdf5.c index 6ffeac2..d81827e 100644 --- a/testpar/testphdf5.c +++ b/testpar/testphdf5.c @@ -25,7 +25,7 @@ /* Define some handy debugging shorthands, routines, ... */ /* debugging tools */ #define MESG(x)\ - if (verbose) printf("%s\n", x);\ + if (verbose) printf("%s\n", x); #define MPI_BANNER(mesg)\ {printf("--------------------------------\n");\ @@ -917,10 +917,12 @@ test_split_comm_access(char *filenames[]) /* setup file access template */ acc_tpl = H5Pcreate (H5P_FILE_ACCESS); assert(acc_tpl != FAIL); + MESG("H5Pcreate succeed"); /* set Parallel access with communicator */ ret = H5Pset_mpi(acc_tpl, comm, info); assert(ret != FAIL); + MESG("H5Pset_mpi succeed"); /* create the file collectively */ fid=H5Fcreate(filenames[color],H5F_ACC_TRUNC,H5P_DEFAULT,acc_tpl); @@ -983,7 +985,12 @@ parse_options(int argc, char **argv){ main(int argc, char **argv) { +#ifdef HAVE_PARALLEL + char *filenames[]={ "pfs:/pfs/multi/tmp_1/your_own/Eg1.h5f", "pfs:/pfs/multi/tmp_1/your_own/Eg2.h5f" }; char *filenames[]={ "ParaEg1.h5f", "ParaEg2.h5f" }; +#else + char *filenames[]={ "Eg1.h5f", "Eg2.h5f" }; +#endif int mpi_namelen; char mpi_name[MPI_MAX_PROCESSOR_NAME]; |