diff options
| author | tradke <tradke@7842ec3a-9562-4be5-9c5b-06ba18f2b668> | 2006-10-04 14:44:09 +0000 |
|---|---|---|
| committer | tradke <tradke@7842ec3a-9562-4be5-9c5b-06ba18f2b668> | 2006-10-04 14:44:09 +0000 |
| commit | cf5820aa9635b49ee1aa27e4a66d22cb9ca01950 (patch) | |
| tree | 2c8a5504003620dd220c95d08e673b8d16d94d9c | |
| parent | ae1d00f464cf32f56a0d2e64d152f863f0c8810b (diff) | |
Make only optional use of aliased function Coord_GroupSystem().
git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGHIO/IOHDF5Util/trunk@133 7842ec3a-9562-4be5-9c5b-06ba18f2b668
| -rw-r--r-- | interface.ccl | 2 | ||||
| -rw-r--r-- | src/DumpUtils.c | 6 |
2 files changed, 6 insertions, 2 deletions
diff --git a/interface.ccl b/interface.ccl index c6bdce0..9fa8381 100644 --- a/interface.ccl +++ b/interface.ccl @@ -45,4 +45,4 @@ CCTK_INT FUNCTION Coord_GroupSystem \ (CCTK_POINTER_TO_CONST IN GH, \ CCTK_STRING IN groupname) -REQUIRES FUNCTION Coord_GroupSystem +USES FUNCTION Coord_GroupSystem diff --git a/src/DumpUtils.c b/src/DumpUtils.c index 5b4c6aa..54c56ce 100644 --- a/src/DumpUtils.c +++ b/src/DumpUtils.c @@ -257,7 +257,11 @@ void IOHDF5Util_DumpCommonAttributes (const cGH *GH, const ioRequest *request, /* attributes describing the variable */ groupname = CCTK_GroupNameFromVarI (request->vindex); WRITE_ATTRIBUTE ("groupname", groupname, object, myGH, 0, myGH->HDF5_STRING); - coord_system_handle = Coord_GroupSystem (GH, groupname); + coord_system_handle = -1; + if (CCTK_IsFunctionAliased ("Coord_GroupSystem")) + { + coord_system_handle = Coord_GroupSystem (GH, groupname); + } free (groupname); iattr = CCTK_GroupTypeFromVarI (request->vindex); WRITE_ATTRIBUTE ("grouptype", &iattr, object, myGH, 0, HDF5_INT); |