diff options
| author | tradke <tradke@38c3d835-c875-442e-b0fe-21c19ce1d001> | 2006-10-04 14:44:09 +0000 |
|---|---|---|
| committer | tradke <tradke@38c3d835-c875-442e-b0fe-21c19ce1d001> | 2006-10-04 14:44:09 +0000 |
| commit | 0e1c02ab5349a0344b2f9dcfff983b8bcf48f715 (patch) | |
| tree | 2456468b7e7ce3891aef846cd2652108d9b173e7 | |
| parent | b535cd40679b275b0c958432859b5297b8cd213a (diff) | |
Make only optional use of aliased function Coord_GroupSystem().
git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGHIO/IOPanda/trunk@81 38c3d835-c875-442e-b0fe-21c19ce1d001
| -rw-r--r-- | interface.ccl | 2 | ||||
| -rw-r--r-- | src/Output.c | 6 |
2 files changed, 6 insertions, 2 deletions
diff --git a/interface.ccl b/interface.ccl index f111b1c..d2b359f 100644 --- a/interface.ccl +++ b/interface.ccl @@ -46,4 +46,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/Output.c b/src/Output.c index 9d72097..4a40677 100644 --- a/src/Output.c +++ b/src/Output.c @@ -597,7 +597,11 @@ static void AddCommonAttributes (const cGH *GH, const ioRequest *request, name = CCTK_GroupNameFromVarI (request->vindex); Panda_WriteAttribute (fname, "groupname", BYTE, strlen (name) + 1, name); - coord_system_handle = Coord_GroupSystem (GH, name); + coord_system_handle = -1; + if (CCTK_IsFunctionAliased ("Coord_GroupSystem")) + { + coord_system_handle = Coord_GroupSystem (GH, name); + } free (name); itmp[0] = CCTK_GroupTypeFromVarI (request->vindex); |