From 3c60b8752248fa3e227f0aaf6137e3d7b7ff2eee Mon Sep 17 00:00:00 2001
From: tradke <tradke@38c3d835-c875-442e-b0fe-21c19ce1d001>
Date: Thu, 23 May 2002 15:53:05 +0000
Subject: Bugfix in checking for complex variables.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGHIO/IOPanda/trunk@35 38c3d835-c875-442e-b0fe-21c19ce1d001
---
 src/Output.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/Output.c b/src/Output.c
index e18615d..731927f 100644
--- a/src/Output.c
+++ b/src/Output.c
@@ -330,7 +330,8 @@ static void CheckSteerableParameters (const cGH *GH)
         continue;
       }
 
-      if (strncmp (CCTK_VarTypeName (vindex), "CCTK_VARIABLE_COMPLEX", 21))
+      if (strncmp (CCTK_VarTypeName (CCTK_VarTypeI (vindex)),
+                   "CCTK_VARIABLE_COMPLEX", 21))
       {
         fullname = CCTK_FullName (vindex);
         CCTK_VWarn (1, __LINE__, __FILE__, CCTK_THORNSTRING,
-- 
cgit v1.2.3