diff options
Diffstat (limited to 'Carpet/CarpetIOScalar')
-rw-r--r-- | Carpet/CarpetIOScalar/interface.ccl | 6 | ||||
-rw-r--r-- | Carpet/CarpetIOScalar/src/ioscalar.cc | 5 |
2 files changed, 11 insertions, 0 deletions
diff --git a/Carpet/CarpetIOScalar/interface.ccl b/Carpet/CarpetIOScalar/interface.ccl index 15ac97758..1febe145c 100644 --- a/Carpet/CarpetIOScalar/interface.ccl +++ b/Carpet/CarpetIOScalar/interface.ccl @@ -29,3 +29,9 @@ USES FUNCTION UniqueBuildID CCTK_POINTER_TO_CONST \ FUNCTION UniqueSimulationID (CCTK_POINTER_TO_CONST IN cctkGH) USES FUNCTION UniqueSimulationID + +# Return a pointer to an unmodifiable C string +# which contains a unique ID for this run +CCTK_POINTER_TO_CONST \ +FUNCTION UniqueRunID (CCTK_POINTER_TO_CONST IN cctkGH) +USES FUNCTION UniqueRunID diff --git a/Carpet/CarpetIOScalar/src/ioscalar.cc b/Carpet/CarpetIOScalar/src/ioscalar.cc index bf5a113ab..d637b1f66 100644 --- a/Carpet/CarpetIOScalar/src/ioscalar.cc +++ b/Carpet/CarpetIOScalar/src/ioscalar.cc @@ -339,6 +339,11 @@ namespace CarpetIOScalar { = static_cast<char const *> (UniqueSimulationID (cctkGH)); file << "# Simulation ID: " << job_id << eol; } + if (CCTK_IsFunctionAliased ("UniqueRunID")) { + char const * const job_id + = static_cast<char const *> (UniqueRunID (cctkGH)); + file << "# Run ID: " << job_id << eol; + } } file << "#" << eol; if (want_labels) { |