diff options
-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); |