summaryrefslogtreecommitdiff
path: root/lib/sbin/schedule_parser.pl
diff options
context:
space:
mode:
authorallen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac>1999-06-29 14:17:55 +0000
committerallen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac>1999-06-29 14:17:55 +0000
commit153d93b0f564c8c432e1dc214dfc964cf91e125f (patch)
treee3ef3cbbad55387d55aa7955ba163e7929120c74 /lib/sbin/schedule_parser.pl
parentd9309b5c94705b769a7398e309986bb41b784817 (diff)
New names:
declare_parameters.h -> cctk_parameters.h declare_arguments.h -> cctk_arguments.h DECLARE_PARAMETERS -> DECLARE_CCTK_PARAMETERS Thorn changes in CactusBase and CactusEinstein will be commited now. git-svn-id: http://svn.cactuscode.org/flesh/trunk@604 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/schedule_parser.pl')
-rw-r--r--lib/sbin/schedule_parser.pl14
1 files changed, 7 insertions, 7 deletions
diff --git a/lib/sbin/schedule_parser.pl b/lib/sbin/schedule_parser.pl
index 51ef67af..a96a9fdc 100644
--- a/lib/sbin/schedule_parser.pl
+++ b/lib/sbin/schedule_parser.pl
@@ -102,12 +102,12 @@ sub write_rfr_header {
$header .= "#include \"Groups.h\"\n";
$header .= "#include \"GroupsOnGH.h\"\n";
$header .= "#include \"rfr_constants.h\"\n";
- $header .= "#include \"declare_parameters.h\"\n";
- $header .= "#include \"declare_arguments.h\"\n";
+ $header .= "#include \"cctk_parameters.h\"\n";
+ $header .= "#include \"cctk_arguments.h\"\n";
$header .= "\n";
$header .= "void $routine (cGH *GH)\n";
$header .= "{\n";
- $header .= " DECLARE_PARAMETERS\n";
+ $header .= " DECLARE_CCTK_PARAMETERS\n";
$header .= " int index;\n\n";
$header .= "\n";
@@ -124,11 +124,11 @@ sub write_startup_header {
print OUTSTART "#include \"cctk.h\"\n";
print OUTSTART "#include \"flesh.h\"\n";
print OUTSTART "#include \"rfr_constants.h\"\n";
- print OUTSTART "#include \"declare_parameters.h\"\n";
+ print OUTSTART "#include \"cctk_parameters.h\"\n";
print OUTSTART "\n";
print OUTSTART "void $routine ()\n";
print OUTSTART "{\n";
- print OUTSTART " DECLARE_PARAMETERS\n";
+ print OUTSTART " DECLARE_CCTK_PARAMETERS\n";
print OUTSTART "\n";
@@ -622,7 +622,7 @@ sub fortran_wrapper {
#include \"flesh.h\"
#include \"Groups.h\"
#include \"Comm.h\"
-#include \"declare_arguments.h\"
+#include \"cctk_arguments.h\"
void FORTRAN_NAME($routine)($THORN_C2F_PROTO);
@@ -636,7 +636,7 @@ sub fortran_wrapper {
printf(\"Calling \%s from rfr wrapper\\n\");
#endif
- FORTRAN_NAME($routine)(PASS_$THORN_C2F(GH));
+ FORTRAN_NAME($routine)(PASS_$THORN_C2F(cctkGH));
}
EOT