Commit 51560ad3 authored by gsell's avatar gsell

src/H5Block

	- several debug-prints added
parent e35679ba
......@@ -877,6 +877,14 @@ _select_hyperslab_for_reading (
(field_dims[1] < b->j_max) ||
(field_dims[2] < b->i_max) ) return HANDLE_H5PART_LAYOUT_ERR;
_H5Part_print_debug (
"PROC[%d]: \n"
"\tfield_dims: (%lld,%lld,%lld)",
f->myproc,
(long long)field_dims[2],
(long long)field_dims[1],
(long long)field_dims[0] );
b->diskshape = H5Screate_simple ( rank, field_dims,field_dims );
if ( b->diskshape < 0 )
return HANDLE_H5S_CREATE_SIMPLE_3D_ERR ( field_dims );
......@@ -894,6 +902,22 @@ _select_hyperslab_for_reading (
NULL );
if ( herr < 0 ) return HANDLE_H5S_SELECT_HYPERSLAB_ERR;
_H5Part_print_debug (
"PROC[%d]: Select hyperslab: \n"
"\tstart: (%lld,%lld,%lld)\n"
"\tstride: (%lld,%lld,%lld)\n"
"\tdims: (%lld,%lld,%lld)",
f->myproc,
(long long)start[2],
(long long)start[1],
(long long)start[0],
(long long)stride[2],
(long long)stride[1],
(long long)stride[0],
(long long)part_dims[2],
(long long)part_dims[1],
(long long)part_dims[0] );
return H5PART_SUCCESS;
}
......@@ -1027,16 +1051,21 @@ _select_hyperslab_for_writing (
if ( b->diskshape < 0 )
return HANDLE_H5S_CREATE_SIMPLE_3D_ERR ( field_dims );
_H5Part_print_debug ( "PROC[%d]: Select hyperslab on diskshape: "
"start: (%lld,%lld,%lld); "
"dims: (%lld,%lld,%lld)",
f->myproc,
(long long)start[0],
(long long)start[1],
(long long)start[2],
(long long)part_dims[0],
(long long)part_dims[1],
(long long)part_dims[2] );
_H5Part_print_debug (
"PROC[%d]: Select hyperslab on diskshape: \n"
"\tstart: (%lld,%lld,%lld)\n"
"\tstride: (%lld,%lld,%lld)\n"
"\tdims: (%lld,%lld,%lld)",
f->myproc,
(long long)start[2],
(long long)start[1],
(long long)start[0],
(long long)stride[2],
(long long)stride[1],
(long long)stride[0],
(long long)part_dims[2],
(long long)part_dims[1],
(long long)part_dims[0] );
herr = H5Sselect_hyperslab (
b->diskshape,
......@@ -1059,6 +1088,22 @@ _select_hyperslab_for_writing (
start[1] = p->j_start - q->j_start;
start[2] = p->i_start - q->i_start;
_H5Part_print_debug (
"PROC[%d]: Select hyperslab on memshape: \n"
"\tstart: (%lld,%lld,%lld)\n"
"\tstride: (%lld,%lld,%lld)\n"
"\tdims: (%lld,%lld,%lld)",
f->myproc,
(long long)start[2],
(long long)start[1],
(long long)start[0],
(long long)stride[2],
(long long)stride[1],
(long long)stride[0],
(long long)part_dims[2],
(long long)part_dims[1],
(long long)part_dims[0] );
herr = H5Sselect_hyperslab (
b->memshape,
H5S_SELECT_SET,
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment