C99 -> C89

git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/RotatingSymmetry90/trunk@23 c3c03602-0f4f-0410-b3fa-d2c81c8a7dc5

1 files changed, 1 insertions, 1 deletions

diff --git a/src/rotatingsymmetry90.c b/src/rotatingsymmetry90.c
index a923fc7..5ba6fff 100644
--- a/src/rotatingsymmetry90.c
+++ b/src/rotatingsymmetry90.c
@@ -274,13 +274,13 @@ int BndRot90VI (cGH const * restrict const cctkGH,
               didwarn = calloc (CCTK_NumGroups(), sizeof *didwarn);
             }
             if (! didwarn[gis[var]]) {
-              didwarn[gis[var]] = 1;
               char * groupname = CCTK_GroupName(gis[var]);
               assert (groupname);
               CCTK_VWarn (2, __LINE__, __FILE__, CCTK_THORNSTRING,
                           "Group \"%s\" has no tensor type and contains more than one element -- treating these as \"scalar\"",
                           groupname);
               free (groupname);
+              didwarn[gis[var]] = 1;
             }
           }
           strcpy (tensortypealias, "scalar");