[cig-commits] r4208 - mc/3D/CitcomS/trunk/lib
luis at geodynamics.org
luis at geodynamics.org
Wed Aug 2 18:30:32 PDT 2006
Author: luis
Date: 2006-08-02 18:30:32 -0700 (Wed, 02 Aug 2006)
New Revision: 4208
Modified:
mc/3D/CitcomS/trunk/lib/Output_h5.c
Log:
Updated debug statements.
Modified: mc/3D/CitcomS/trunk/lib/Output_h5.c
===================================================================
--- mc/3D/CitcomS/trunk/lib/Output_h5.c 2006-08-03 01:05:46 UTC (rev 4207)
+++ mc/3D/CitcomS/trunk/lib/Output_h5.c 2006-08-03 01:30:32 UTC (rev 4208)
@@ -241,6 +241,7 @@
/* determine filename */
strncpy(E->hdf5.filename, E->control.data_file, (size_t)99);
strncat(E->hdf5.filename, ".h5", (size_t)99);
+ printf("\tfilename = \"%s\"\n", E->hdf5.filename);
/* set up file creation property list with defaults */
fcpl_id = H5P_DEFAULT;
@@ -253,8 +254,6 @@
file_id = h5create_file(E->hdf5.filename, H5F_ACC_TRUNC, fcpl_id, fapl_id);
H5Pclose(fapl_id);
- printf("\tfilename = \"%s\"\n", E->hdf5.filename);
-
/* save the file identifier for later use */
E->hdf5.file_id = file_id;
@@ -420,6 +419,8 @@
* estimated size_hint parameter
*/
group_id = H5Gcreate(loc_id, name, size_hint);
+ printf("h5create_group()\n");
+ printf("\tname=\"%s\"\n", name);
/* Write necessary attributes for PyTables compatibility */
set_attribute(group_id, "TITLE", "CitcomS HDF5 group");
@@ -455,16 +456,22 @@
herr_t status;
///* DEBUG
- printf("h5create_array(): %s\n", name);
- printf("\tdims={%d,%d,%d,%d,%d}, ", (int)dims[0], (int)dims[1], (int)dims[2], (int)dims[3], (int)dims[4]);
+ printf("h5create_array()\n");
+ printf("\tname=\"%s\"\n", name);
+ printf("\tdims={%d,%d,%d,%d,%d}\n",
+ (int)dims[0], (int)dims[1], (int)dims[2], (int)dims[3], (int)dims[4]);
if(maxdims != NULL)
- printf("maxdims={%d,%d,%d,%d,%d}, ", (int)maxdims[0], (int)maxdims[1], (int)maxdims[2], (int)maxdims[3], (int)maxdims[4]);
+ printf("maxdims={%d,%d,%d,%d,%d}\n",
+ (int)maxdims[0], (int)maxdims[1], (int)maxdims[2],
+ (int)maxdims[3], (int)maxdims[4]);
else
- printf("maxdims=NULL, ");
+ printf("maxdims=NULL\n");
if(chunkdims != NULL)
- printf("chunkdims={%d,%d,%d,%d,%d}\n", (int)chunkdims[0], (int)chunkdims[1], (int)chunkdims[2], (int)chunkdims[3], (int)chunkdims[4]);
+ printf("chunkdims={%d,%d,%d,%d,%d}\n",
+ (int)chunkdims[0], (int)chunkdims[1], (int)chunkdims[2],
+ (int)chunkdims[3], (int)chunkdims[4]);
else
- printf("chunkdims=NULL\n");
+ printf("chunkdims=NULL\n");
// */
/* create the dataspace for the dataset */
@@ -513,14 +520,26 @@
printf("h5write_array_hyperslab()\n");
printf("\trank = %d\n", rank);
if(size != NULL)
- printf("\tsize = {%d,%d,%d,%d,%d}\n", (int)size[0], (int)size[1], (int)size[2], (int)size[3], (int)size[4]);
+ printf("\tsize = {%d,%d,%d,%d,%d}\n",
+ (int)size[0], (int)size[1], (int)size[2],
+ (int)size[3], (int)size[4]);
else
printf("\tsize = NULL\n");
- printf("\tmemdims = {%d,%d,%d,%d,%d}\n", (int)memdims[0], (int)memdims[1], (int)memdims[2], (int)memdims[3], (int)memdims[4]);
- printf("\toffset = {%d,%d,%d,%d,%d}\n", (int)offset[0], (int)offset[1], (int)offset[2], (int)offset[3], (int)offset[4]);
- printf("\tstride = {%d,%d,%d,%d,%d}\n", (int)stride[0], (int)stride[1], (int)stride[2], (int)stride[3], (int)stride[4]);
- printf("\tcount = {%d,%d,%d,%d,%d}\n", (int)count[0], (int)count[1], (int)count[2], (int)count[3], (int)count[4]);
- printf("\tblock = {%d,%d,%d,%d,%d}\n", (int)block[0], (int)block[1], (int)block[2], (int)block[3], (int)block[4]);
+ printf("\tmemdims = {%d,%d,%d,%d,%d}\n",
+ (int)memdims[0], (int)memdims[1], (int)memdims[2],
+ (int)memdims[3], (int)memdims[4]);
+ printf("\toffset = {%d,%d,%d,%d,%d}\n",
+ (int)offset[0], (int)offset[1], (int)offset[2],
+ (int)offset[3], (int)offset[4]);
+ printf("\tstride = {%d,%d,%d,%d,%d}\n",
+ (int)stride[0], (int)stride[1], (int)stride[2],
+ (int)stride[3], (int)stride[4]);
+ printf("\tcount = {%d,%d,%d,%d,%d}\n",
+ (int)count[0], (int)count[1], (int)count[2],
+ (int)count[3], (int)count[4]);
+ printf("\tblock = {%d,%d,%d,%d,%d}\n",
+ (int)block[0], (int)block[1], (int)block[2],
+ (int)block[3], (int)block[4]);
// */
/* extend the dataset if necessary */
More information about the cig-commits
mailing list