From 0e1c02ab5349a0344b2f9dcfff983b8bcf48f715 Mon Sep 17 00:00:00 2001
From: tradke <tradke@38c3d835-c875-442e-b0fe-21c19ce1d001>
Date: Wed, 4 Oct 2006 14:44:09 +0000
Subject: 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
---
 interface.ccl | 2 +-
 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);
-- 
cgit v1.2.3