Changing names of internal array size parameters to start with cctkv to prevent

conflicts with user variables.  We should really change to passing in as an array
rather than <dim> seperate args.

Tom


git-svn-id: http://svn.cactuscode.org/flesh/trunk@2406 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 3 insertions, 3 deletions

diff --git a/lib/sbin/GridFuncStuff.pl b/lib/sbin/GridFuncStuff.pl
index 4f0d0d25..eafd703b 100644
--- a/lib/sbin/GridFuncStuff.pl
+++ b/lib/sbin/GridFuncStuff.pl
@@ -266,15 +266,15 @@ sub GetThornArguments
 
         for($dim =0; $dim < $rhinterface_db->{"\U$thorn GROUP $group DIM\E"}; $dim++)
         {
-          $type .= "$sep$group$dim";
+          $type .= "${sep}cctkv$group$dim";
           $sep = ",";
           if($block eq "PRIVATE")
           {
-            $arguments{"$group$dim"} = "(STORAGESIZE($thorn\::$group, $dim))";
+            $arguments{"cctkv$group$dim"} = "(STORAGESIZE($thorn\::$group, $dim))";
           }
           else
           {
-            $arguments{"$group$dim"} = "(STORAGESIZE($imp\::$group, $dim))";
+            $arguments{"cctkv$group$dim"} = "(STORAGESIZE($imp\::$group, $dim))";
           }
         }
 	if(defined($vararraysize) && $compactgroup == 0)