mirror of
https://github.com/HDFGroup/hdf5.git
synced 2024-12-27 08:01:04 +08:00
Fix printf warnings in t_mpi (#3679)
* Fix printf warnings in t_mpi The type of MPI_Offset varies with implementation. In MPICH, it's long, which raises warnings when we attempt to use long long format specifiers. Casting to long long fixes the warnings.
This commit is contained in:
parent
e158217012
commit
ccb1a917b6
@ -306,12 +306,14 @@ test_mpio_gb_file(char *filename)
|
|||||||
for (i = ntimes - 2; i <= ntimes; i++) {
|
for (i = ntimes - 2; i <= ntimes; i++) {
|
||||||
mpi_off = (i * mpi_size + mpi_rank) * (MPI_Offset)MB;
|
mpi_off = (i * mpi_size + mpi_rank) * (MPI_Offset)MB;
|
||||||
if (VERBOSE_MED)
|
if (VERBOSE_MED)
|
||||||
fprintf(stdout, "proc %d: write to mpi_off=%016llx, %lld\n", mpi_rank, mpi_off, mpi_off);
|
fprintf(stdout, "proc %d: write to mpi_off=%016llx, %lld\n", mpi_rank, (long long)mpi_off,
|
||||||
|
(long long)mpi_off);
|
||||||
/* set data to some trivial pattern for easy verification */
|
/* set data to some trivial pattern for easy verification */
|
||||||
for (j = 0; j < MB; j++)
|
for (j = 0; j < MB; j++)
|
||||||
*(buf + j) = (int8_t)(i * mpi_size + mpi_rank);
|
*(buf + j) = (int8_t)(i * mpi_size + mpi_rank);
|
||||||
if (VERBOSE_MED)
|
if (VERBOSE_MED)
|
||||||
fprintf(stdout, "proc %d: writing %d bytes at offset %lld\n", mpi_rank, MB, mpi_off);
|
fprintf(stdout, "proc %d: writing %d bytes at offset %lld\n", mpi_rank, MB,
|
||||||
|
(long long)mpi_off);
|
||||||
mrc = MPI_File_write_at(fh, mpi_off, buf, MB, MPI_BYTE, &mpi_stat);
|
mrc = MPI_File_write_at(fh, mpi_off, buf, MB, MPI_BYTE, &mpi_stat);
|
||||||
INFO((mrc == MPI_SUCCESS), "GB size file write");
|
INFO((mrc == MPI_SUCCESS), "GB size file write");
|
||||||
if (mrc != MPI_SUCCESS)
|
if (mrc != MPI_SUCCESS)
|
||||||
@ -345,7 +347,8 @@ test_mpio_gb_file(char *filename)
|
|||||||
for (i = ntimes - 2; i <= ntimes; i++) {
|
for (i = ntimes - 2; i <= ntimes; i++) {
|
||||||
mpi_off = (i * mpi_size + (mpi_size - mpi_rank - 1)) * (MPI_Offset)MB;
|
mpi_off = (i * mpi_size + (mpi_size - mpi_rank - 1)) * (MPI_Offset)MB;
|
||||||
if (VERBOSE_MED)
|
if (VERBOSE_MED)
|
||||||
fprintf(stdout, "proc %d: read from mpi_off=%016llx, %lld\n", mpi_rank, mpi_off, mpi_off);
|
fprintf(stdout, "proc %d: read from mpi_off=%016llx, %lld\n", mpi_rank,
|
||||||
|
(long long)mpi_off, (long long)mpi_off);
|
||||||
mrc = MPI_File_read_at(fh, mpi_off, buf, MB, MPI_BYTE, &mpi_stat);
|
mrc = MPI_File_read_at(fh, mpi_off, buf, MB, MPI_BYTE, &mpi_stat);
|
||||||
INFO((mrc == MPI_SUCCESS), "GB size file read");
|
INFO((mrc == MPI_SUCCESS), "GB size file read");
|
||||||
expected = (int8_t)(i * mpi_size + (mpi_size - mpi_rank - 1));
|
expected = (int8_t)(i * mpi_size + (mpi_size - mpi_rank - 1));
|
||||||
|
Loading…
Reference in New Issue
Block a user