Moving several IO method specific parameters into their own method thorns

git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/IOUtil/trunk@18 b32723a9-ab3a-4a60-88e2-2e5d99d7c17a

1 files changed, 0 insertions, 74 deletions

diff --git a/src/GHExtension.c b/src/GHExtension.c
index 360d51e..d493f35 100644
--- a/src/GHExtension.c
+++ b/src/GHExtension.c
@@ -44,80 +44,6 @@ int IOUtil_InitGH(cGH *GH)
 
   myGH = (ioGH *) GH->extensions [CCTK_GHExtensionHandle ("IO")];
 
-  /* How often to output with each method */
-  myGH->infoevery  = outputinfo_every;
-  myGH->IO_0Devery = output_every;
-  myGH->IO_1Devery = output_every;
-  myGH->IO_2Devery = output_every;
-  myGH->IO_3Devery = output_every;
-  if (outputinfo_every > 0)
-    myGH->infoevery = outputinfo_every;
-  if (output0d_every > 0)
-    myGH->IO_0Devery = output0d_every;
-  if (output1d_every > 0)
-    myGH->IO_1Devery = output1d_every;
-  if (output2d_every > 0)
-    myGH->IO_2Devery = output2d_every;
-  if (output3d_every > 0)
-    myGH->IO_3Devery = output3d_every;
-
-  /* Set the output directory */
-  myGH->outpfx_0D = outdir;
-  myGH->outpfx_1D = outdir;
-  myGH->outpfx_2D = outdir;
-  myGH->outpfx_3D = outdir;
-  if (!CCTK_Equals(outdir0d,"outdir"))
-    myGH->outpfx_0D = outdir0d;
-  if (!CCTK_Equals(outdir1d,"outdir"))
-    myGH->outpfx_1D = outdir1d;
-  if (!CCTK_Equals(outdir2d,"outdir"))
-    myGH->outpfx_2D = outdir2d;
-  if (!CCTK_Equals(outdir3d,"outdir"))
-    myGH->outpfx_3D = outdir3d;
-
-  /* Create the output directories */
-  if (myGH->IO_0Devery > 0) {
-    if (CCTK_MyProc (GH) == 0) {
-      char *command = (char *) malloc (1024 * sizeof (char));
-
-      sprintf (command, "mkdir -p %s", myGH->outpfx_0D);
-      if (system (command) < 0)
-        CCTK_WARN (1,"Problem creating IO 0D directory");
-      free (command);
-    }
-  }
-  if (myGH->IO_1Devery > 0) {
-    if (CCTK_MyProc (GH) == 0) {
-      char *command = (char *) malloc (1024 * sizeof (char));
-
-      sprintf (command, "mkdir -p %s", myGH->outpfx_1D);
-      if (system (command) < 0)
-        CCTK_WARN (1,"Problem creating IO 1D directory");
-      free (command);
-    }
-  }
-  if (myGH->IO_2Devery > 0) {
-    if (CCTK_MyProc (GH) == 0) {
-      char *command = (char *) malloc (1024 * sizeof (char));
-
-      sprintf (command, "mkdir -p %s", myGH->outpfx_2D);
-      if (system (command) < 0)
-        CCTK_WARN (1,"Problem creating IO 2D directory");
-      free (command);
-    }
-  }
-  if (myGH->IO_3Devery > 0) {
-    if (CCTK_MyProc (GH) == 0) {
-      char *command = (char *) malloc (1024 * sizeof (char));
-
-      sprintf (command, "mkdir -p %s", myGH->outpfx_3D);
-      i = system(command);
-      if (system (command) < 0)
-        CCTK_WARN (1,"Problem creating IO 3D directory");
-      free (command);
-    }
-  }
-
   /* Create the checkpoint directory */
   if (checkpoint_every > 0 && CCTK_Equals (checkpoint_dir, outdir) != 0) {
     if (CCTK_MyProc (GH) == 0) {