diff options
author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-01-28 15:18:43 +0000 |
---|---|---|
committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-01-28 15:18:43 +0000 |
commit | c5ac1da06aada70eb7c33c2b12bbf9b38bb0b805 (patch) | |
tree | 395a2459cc5101ed461cd495e74a2d581db93725 /lib/sbin/GridFuncStuff.pl | |
parent | 75b15c04bcd028e26c95472ce81ffab95b1fb496 (diff) |
Fixed bug whereby the CreateGroups calls didn't pass the dimension.
It's amazing the result of a string being interpreted as an in !
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@129 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/GridFuncStuff.pl')
-rw-r--r-- | lib/sbin/GridFuncStuff.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/sbin/GridFuncStuff.pl b/lib/sbin/GridFuncStuff.pl index e04f5f36..6ca20aeb 100644 --- a/lib/sbin/GridFuncStuff.pl +++ b/lib/sbin/GridFuncStuff.pl @@ -819,6 +819,7 @@ sub CreateThornGroupInitialisers $line = " CCTK_CreateGroup(\"\U$group\",\"$thorn\",\"$imp\",\n" . " \"" . $interface_database{"\U$thorn GROUP $group\E GTYPE"} . "\",\n" . " \"" . $interface_database{"\U$thorn GROUP $group\E VTYPE"} . "\",\n" + . " " . $interface_database{"\U$thorn GROUP $group\E DIM"} . ",\n" . " ". scalar(@variables); foreach $variable (@variables) { |