aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authortradke <tradke@7842ec3a-9562-4be5-9c5b-06ba18f2b668>2001-06-26 20:17:33 +0000
committertradke <tradke@7842ec3a-9562-4be5-9c5b-06ba18f2b668>2001-06-26 20:17:33 +0000
commit56c65d135cff696ef247a5529f06425b46ca7d7c (patch)
tree44614545b4ed2dbeb0f3490301121b29b86763bd
parent510b8dbeda3156b6266644b3700a24e82ac31e95 (diff)
Use the new API for NewHyperslab_GetLocalHyperslab().
You also need to update CactusPUGH/PUGHSlab before recompiling. git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGHIO/IOHDF5Util/trunk@38 7842ec3a-9562-4be5-9c5b-06ba18f2b668
-rw-r--r--src/DumpVar.c33
1 files changed, 17 insertions, 16 deletions
diff --git a/src/DumpVar.c b/src/DumpVar.c
index 2e4a610..9f31438 100644
--- a/src/DumpVar.c
+++ b/src/DumpVar.c
@@ -540,10 +540,10 @@ static int IOHDF5Util_getDumpData (cGH *GH,
int *free_outme,
CCTK_INT *geom)
{
- int i;
+ int i, retval;
int cctk_output_type;
ioGH *ioUtilGH;
- int *hsizes,*hsizes_global,*hsizes_offset; /* geometry information */
+ int *hsizes, *hsizes_global, *hsizes_offset; /* geometry information */
char *fullname;
@@ -596,31 +596,32 @@ static int IOHDF5Util_getDumpData (cGH *GH,
}
#endif
- if (NewHyperslab_GetLocalHyperslab (GH, vindex, timelevel, request->sdim,
+ retval = NewHyperslab_GetLocalHyperslab (GH, vindex, timelevel, request->sdim,
cctk_output_type, NULL, request->origin,
request->direction, request->length,
- request->downsample, outme,
- hsizes, hsizes_global, hsizes_offset) < 0)
+ request->downsample, outme, free_outme,
+ hsizes, hsizes_global, hsizes_offset);
+ if (retval == 0)
+ {
+ for (i = 0; i < request->sdim; i++)
+ {
+ geom[i + 0*request->sdim] = hsizes_offset[i];
+ geom[i + 1*request->sdim] = hsizes[i];
+ geom[i + 2*request->sdim] = hsizes_global[i];
+ request->actlen[i] = hsizes_global[i];
+ }
+ }
+ else
{
fullname = CCTK_FullName (vindex);
CCTK_VWarn (1, __LINE__, __FILE__, CCTK_THORNSTRING,
"Failed to extract hyperslab for variable '%s'", fullname);
free (fullname);
- *free_outme = 0;
- return (-1);
- }
-
- for (i = 0; i < request->sdim; i++)
- {
- geom[i + 0*request->sdim] = hsizes_offset[i];
- geom[i + 1*request->sdim] = hsizes[i];
- geom[i + 2*request->sdim] = hsizes_global[i];
- request->actlen[i] = hsizes_global[i];
}
free (hsizes);
- return (0);
+ return (retval);
}