diff options
author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2000-01-11 09:36:19 +0000 |
---|---|---|
committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2000-01-11 09:36:19 +0000 |
commit | 3208fd2352125daa7a09faca98b9475c7dfedc16 (patch) | |
tree | a23952c1c83b67c457e61d3540064f4189374b60 /lib/sbin/CreateParameterBindings.pl | |
parent | ad5f2c8a3fba47e6f1e5b438204c15bedb0f818c (diff) |
Adding USE_CCTK_PARAMETERS which will eventually remove warnings on origin
git-svn-id: http://svn.cactuscode.org/flesh/trunk@1223 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/CreateParameterBindings.pl')
-rw-r--r-- | lib/sbin/CreateParameterBindings.pl | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/lib/sbin/CreateParameterBindings.pl b/lib/sbin/CreateParameterBindings.pl index 14c5fed7..a5fc6822 100644 --- a/lib/sbin/CreateParameterBindings.pl +++ b/lib/sbin/CreateParameterBindings.pl @@ -318,6 +318,34 @@ sub CreateParameterBindings } $dataout .= "\n"; + + $dataout .= "#define USE_CCTK_PARAMETERS \\\n"; + + $decl = "USE_GLOBAL_PARAMETER_STRUCT_PARAMS"; + if($header_files{"GLOBAL"}) + { + $dataout .= "$decl \\\n"; + } + + $decl = "USE_RESTRICTED_\U$implementation\E_STRUCT_PARAMS"; + if($header_files{"\U$implementation\E RESTRICTED"}) + { + $dataout .= "$decl \\\n"; + } + + $decl = "USE_PRIVATE_\U$thorn\E_STRUCT_PARAMS"; + if($header_files{"\U$thorn\E PRIVATE"}) + { + $dataout .= "$decl \\\n"; + } + + foreach $line (@data) + { + $dataout .= $line . "\\\n"; + } + + $dataout .= "\n"; + $dataout .= "#endif\n"; &WriteFile("\U$thorn\E"."_CParameters.h",\$dataout); |