Changed CreateParameterBindingFile() to include header files only if needed.

git-svn-id: http://svn.cactuscode.org/flesh/trunk@3101 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 7 insertions, 4 deletions

diff --git a/lib/sbin/create_c_stuff.pl b/lib/sbin/create_c_stuff.pl
index eb768eb7..046a3e23 100644
--- a/lib/sbin/create_c_stuff.pl
+++ b/lib/sbin/create_c_stuff.pl
@@ -21,15 +21,18 @@
 
 sub CreateParameterBindingFile
 {
-  my($prefix, $structure, $rhparameters, $rhparameter_db) = @_;
+  my($include_headers, $structure, $rhparameters, $rhparameter_db) = @_;
   my($line,@data);
   my(%parameters);
   my($type);
 
   # Header Data
-  push(@data, '#include "cctk_Config.h"');
-  push(@data, '#include "CParameterStructNames.h"');
-  push(@data, '');
+  if ($include_headers)
+  {
+    push(@data, '#include "cctk_Config.h"');
+    push(@data, '#include "CParameterStructNames.h"');
+    push(@data, '');
+  }
 
   # Create the structure
   push(@data, 'struct');