diff options
| author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-02-01 15:58:03 +0000 |
|---|---|---|
| committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-02-01 15:58:03 +0000 |
| commit | 8b11b0d4cf121d38fc4821f331b83b908699baa6 (patch) | |
| tree | 5ba588df15a09a856dfbe1151a917d89cf5fedf2 | |
| parent | ba6f55c037cf9b6d68e3c785f2be878d80352687 (diff) | |
Changed names of some rfr routines
git-svn-id: http://svn.cactuscode.org/flesh/trunk@166 17b73243-c579-4c4c-a9d2-2d5706c11dac
| -rw-r--r-- | lib/sbin/schedule_parser.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/sbin/schedule_parser.pl b/lib/sbin/schedule_parser.pl index 1abd9440..36cd4d58 100644 --- a/lib/sbin/schedule_parser.pl +++ b/lib/sbin/schedule_parser.pl @@ -204,7 +204,7 @@ sub parse_schedule_ccl @list = split(",",$1); foreach $group (@list) { - print $out "EnableGroupStorage(\"$group\");\n"; + print $out "StorageOn(\"$group\");\n"; } } } @@ -217,7 +217,7 @@ sub parse_schedule_ccl @list = split(",",$1); foreach $group (@list) { - print $out "EnableGroupCommunication(\"$group\");\n"; + print $out "CommunicationOn(\"$group\");\n"; } } } @@ -340,7 +340,7 @@ sub parse_schedule_at_RFR { $line = @block[$i]; if ($line =~ m/\s*LANG\s*:\s*FORTRAN\s*$/i) { - print $out " rfrRegister(Cactus_data,".$routine."_wrapper,$when,$desc);\n"; + print $out " rfrRegisterFunction(Cactus_data,".$routine."_wrapper,$when,$desc);\n"; $got_it++; # Write the rfr called fortran wrapper routine |