diff options
author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2000-01-25 09:45:35 +0000 |
---|---|---|
committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2000-01-25 09:45:35 +0000 |
commit | 61da3a6c15e53532f849763e4fc7133f415b038e (patch) | |
tree | 8fbcbf7a9899355b6c18199949c7600aa95a0432 /lib/sbin/CreateParameterBindings.pl | |
parent | bd1f9432a43ab2d1aad91a7323b41309be4cadd0 (diff) |
CCTK function name changes
git-svn-id: http://svn.cactuscode.org/flesh/trunk@1292 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/CreateParameterBindings.pl')
-rw-r--r-- | lib/sbin/CreateParameterBindings.pl | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/lib/sbin/CreateParameterBindings.pl b/lib/sbin/CreateParameterBindings.pl index bca9ff87..b82714eb 100644 --- a/lib/sbin/CreateParameterBindings.pl +++ b/lib/sbin/CreateParameterBindings.pl @@ -448,7 +448,7 @@ sub CreateParameterBindings $dataout .= "#ifdef FCODE\n"; $dataout .= "#include \"FParameters.h\"\n"; $dataout .= "#endif\n\n"; - &WriteFile("cctk_parameters.h",\$dataout); + &WriteFile("cctk_Parameters.h",\$dataout); chdir $start_dir; @@ -604,10 +604,10 @@ sub CreateParameterRegistrationStuff # $quoted_default =~ s:\"::g; The database now strips all unescaped quotes. - $line=" ParameterCreate(\"$parameter\", /* The parameter name */\n". - " \"$thorn\", /* The thorn */\n". - " \"$type\" /* The parameter type */,\n". - " \"$block\", /* The scoping block */\n". + $line=" CCTKi_ParameterCreate(\"$parameter\", /* The parameter name */\n". + " \"$thorn\", /* The thorn */\n". + " \"$type\", /* The parameter type*/\n". + " \"$block\", /* The scoping block */\n". " 0, /* Is it steerable ? */\n". " " . $rhparameter_db->{"\U$thorn $parameter\E description"} . ", /* The description */\n" . " \"" . $quoted_default . "\", /* The default value */\n" . @@ -672,11 +672,11 @@ sub CreateParameterExtensionStuff $quoted_range =~ s:^\s*::; $quoted_range =~ s:\s*$::; - push(@data, " ParameterAddRange(\"$block\","); - push(@data, " \"$parameter\","); - push(@data, " \"$thorn\","); - push(@data, " \"$quoted_range\","); - push(@data, " $range_description);"); + push(@data, " CCTKi_ParameterAddRange(\"$block\","); + push(@data, " \"$parameter\","); + push(@data, " \"$thorn\","); + push(@data, " \"$quoted_range\","); + push(@data, " $range_description);"); push(@data, ""); |