aboutsummaryrefslogtreecommitdiff
path: root/Carpet/CarpetIOScalar
diff options
context:
space:
mode:
Diffstat (limited to 'Carpet/CarpetIOScalar')
-rw-r--r--Carpet/CarpetIOScalar/interface.ccl6
-rw-r--r--Carpet/CarpetIOScalar/src/ioscalar.cc5
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) {