diff options
Diffstat (limited to 'src/Write.c')
| -rw-r--r-- | src/Write.c | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/src/Write.c b/src/Write.c index 0ce149a..a75b5e0 100644 --- a/src/Write.c +++ b/src/Write.c @@ -39,7 +39,7 @@ CCTK_FILEVERSION(BetaThorns_IOStreamedHDF5_Write_c) @vtype cGH * @vio in @endvar - @var index + @var vindex @vdesc index of variable @vtype int @vio in @@ -47,11 +47,11 @@ CCTK_FILEVERSION(BetaThorns_IOStreamedHDF5_Write_c) @var alias @vdesc alias name of variable to output @vtype const char * - @vio in + @vio unused @endvar @@*/ void IOStreamedHDF5_Write (cGH *GH, - int index, + int vindex, const char *alias) { DECLARE_CCTK_PARAMETERS @@ -66,10 +66,13 @@ void IOStreamedHDF5_Write (cGH *GH, H5FD_stream_fapl_t fapl; + /* suppress compiler warnings about unused variables */ + alias = alias; + /* first, check if variable has storage assigned */ - if (! CCTK_QueryGroupStorageI (GH, CCTK_GroupIndexFromVarI (index))) + if (! CCTK_QueryGroupStorageI (GH, CCTK_GroupIndexFromVarI (vindex))) { - fullname = CCTK_FullName (index); + fullname = CCTK_FullName (vindex); CCTK_VWarn (2, __LINE__, __FILE__, CCTK_THORNSTRING, "No IOStreamedHDF5 output for '%s' (no storage)", fullname); free (fullname); @@ -122,14 +125,14 @@ void IOStreamedHDF5_Write (cGH *GH, } /* get the current timelevel */ - timelevel = CCTK_NumTimeLevelsFromVarI (index) - 1; + timelevel = CCTK_NumTimeLevelsFromVarI (vindex) - 1; if (timelevel > 0) { timelevel--; } /* output the data */ - IOHDF5Util_DumpVar (GH, index, timelevel, &myGH->geo_output[index], file, 0); + IOHDF5Util_DumpVar (GH, vindex, timelevel, &myGH->geo_output[vindex], file, 0); /* close the file */ if (file >= 0) |