Adding USE_CCTK_PARAMETERS

git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/IOBasic/trunk@20 b589c3ab-70e8-4b4d-a09f-cba2dd200880

7 files changed, 17 insertions, 6 deletions

diff --git a/src/GHExtension.c b/src/GHExtension.c
index 3313abc..3113866 100644
--- a/src/GHExtension.c
+++ b/src/GHExtension.c
@@ -88,6 +88,9 @@ int IOBasic_InitGH (cGH *GH)
   myGH->filenameListScalar = NULL;
 
   return 0;
+
+  USE_CCTK_PARAMETERS
+
 }
 
 int IOBasic_rfrTraverseGH(cGH *GH, int rfrpoint)
diff --git a/src/Output.c b/src/Output.c
index f7fd147..cb0782a 100644
--- a/src/Output.c
+++ b/src/Output.c
@@ -85,6 +85,9 @@ int IOBasic_OutputGH (cGH *GH)
   }
 
   return 0;
+
+  USE_CCTK_PARAMETERS
+
 }
 
 
diff --git a/src/OutputInfo.c b/src/OutputInfo.c
index 12545eb..fab8d8c 100644
--- a/src/OutputInfo.c
+++ b/src/OutputInfo.c
@@ -128,6 +128,9 @@ int IOBasic_OutputInfoGH (cGH *GH)
     printf("\n");
 
   return 0;
+
+  USE_CCTK_PARAMETERS
+
 }
 
 
diff --git a/src/Startup.c b/src/Startup.c
index c2ea7e2..526eb1b 100644
--- a/src/Startup.c
+++ b/src/Startup.c
@@ -12,7 +12,6 @@
 #include <string.h>
 
 #include "cctk.h"
-#include "cctk_parameters.h"
 
 /* prototypes of functions to be registered */
 int IOBasic_OutputGH (cGH *GH);
@@ -47,7 +46,6 @@ int IOBasic_TimeForInfo (cGH *GH, int);
 @@*/
 void IOBasic_Startup (void)
 {
-  DECLARE_CCTK_PARAMETERS
   int IOMethod;
   int IO_GHExtension;
 
@@ -67,7 +65,7 @@ void IOBasic_Startup (void)
   CCTK_RegisterIOMethodOutputGH (IOMethod, IOBasic_OutputInfoGH);
   CCTK_RegisterIOMethodTimeToOutput (IOMethod, IOBasic_TimeForInfo);
   CCTK_RegisterIOMethodTriggerOutput (IOMethod, IOBasic_TriggerOutputInfo);
-
+  
 }
 
 
diff --git a/src/Write.c b/src/Write.c
index 7eca768..bdb78fc 100644
--- a/src/Write.c
+++ b/src/Write.c
@@ -22,7 +22,6 @@
 void IOBasic_Write (cGH *GH, int index, const char *alias)
 {
   DECLARE_CCTK_PARAMETERS
-  int reduce_handle;
   char *openmode;
   FILE *file;
   CCTK_REAL *data_real;
@@ -46,7 +45,6 @@ void IOBasic_Write (cGH *GH, int index, const char *alias)
   if (CCTK_MyProc (GH) == 0) 
   {
     char fname[256];
-    int  handle;
     iobasicGH *myGH;
 
     myGH = (iobasicGH *) GH->extensions [CCTK_GHExtensionHandle ("IOBasic")];
@@ -93,5 +91,8 @@ void IOBasic_Write (cGH *GH, int index, const char *alias)
     fclose(file);
 
   }
+
+  USE_CCTK_PARAMETERS
+
 }
 
diff --git a/src/WriteGF.c b/src/WriteGF.c
index cf8133b..ccdf5b8 100644
--- a/src/WriteGF.c
+++ b/src/WriteGF.c
@@ -46,7 +46,6 @@ void IOBasic_WriteGF (cGH *GH, int index, const char *alias)
   if (CCTK_MyProc (GH) == 0) {
 
     char fname[256];
-    int  handle;
     iobasicGH *myGH;
 
     myGH = (iobasicGH *) GH->extensions [CCTK_GHExtensionHandle ("IOBasic")];
@@ -125,5 +124,8 @@ void IOBasic_WriteGF (cGH *GH, int index, const char *alias)
   if (CCTK_MyProc (GH) == 0)
     for (i=0;i<4;i++)
       fclose(file[i]);
+
+  USE_CCTK_PARAMETERS
+
 }
 
diff --git a/src/WriteInfo.c b/src/WriteInfo.c
index d8f1a9d..5be067d 100644
--- a/src/WriteInfo.c
+++ b/src/WriteInfo.c
@@ -14,6 +14,7 @@
 @@*/
 
 #include <stdio.h>
+#include <stdlib.h>
 
 #include "cctk.h"
 #include "CactusBase/IOUtil/src/ioGH.h"