diff options
| author | Erik Schnetter <schnetter@cct.lsu.edu> | 2007-04-19 02:12:00 +0000 |
|---|---|---|
| committer | Erik Schnetter <schnetter@cct.lsu.edu> | 2007-04-19 02:12:00 +0000 |
| commit | 21c838812496085e6197c1aff5901c9f8264c96d (patch) | |
| tree | bf7040913163157c72befe6b66d98ac869cc1337 /Carpet/CarpetIOScalar | |
| parent | b3059e308bf224f92f610500d1b88890d999ce5f (diff) | |
CarpetIOScalar: Allow IO::out_dir to be steerable
darcs-hash:20070419021201-dae7b-d2a7a17e5a909522928a93682d4f1f46ddfaf216.gz
Diffstat (limited to 'Carpet/CarpetIOScalar')
| -rw-r--r-- | Carpet/CarpetIOScalar/src/ioscalar.cc | 16 |
1 files changed, 14 insertions, 2 deletions
diff --git a/Carpet/CarpetIOScalar/src/ioscalar.cc b/Carpet/CarpetIOScalar/src/ioscalar.cc index ff9787d34..1ac49919f 100644 --- a/Carpet/CarpetIOScalar/src/ioscalar.cc +++ b/Carpet/CarpetIOScalar/src/ioscalar.cc @@ -208,8 +208,20 @@ namespace CarpetIOScalar { if (CCTK_EQUALS(myoutdir, "")) { myoutdir = out_dir; } - if (CCTK_MyProc(cctkGH)==0) { - CCTK_CreateDirectory (0755, myoutdir); + int const iret = IOUtil_CreateDirectory (cctkGH, myoutdir, 0, 0); + if (iret < 0) { + CCTK_VWarn (1, __LINE__, __FILE__, CCTK_THORNSTRING, + "Could not create output directory \"%s\"", myoutdir); + } else if (CCTK_Equals (verbose, "full")) { + static bool firsttime = true; + if (firsttime and iret > 0) { + CCTK_VInfo (CCTK_THORNSTRING, + "Output directory \"%s\" exists already", myoutdir); + } else if (not firsttime and iret == 0) { + CCTK_VInfo (CCTK_THORNSTRING, + "Created output directory \"%s\"", myoutdir); + } + firsttime = false; } // Find the set of desired reductions |