From c6f8799c3b9747c677ffcdfe983ee6c930892ee8 Mon Sep 17 00:00:00 2001
From: Ben Wibking <ben@wibking.com>
Date: Tue, 12 Nov 2024 12:36:27 -0500
Subject: [PATCH] return DriverStatus::failed

---
 src/driver/driver.cpp | 16 +++++++++++-----
 1 file changed, 11 insertions(+), 5 deletions(-)

diff --git a/src/driver/driver.cpp b/src/driver/driver.cpp
index 0443bdb6a756..9d8ce66ad702 100644
--- a/src/driver/driver.cpp
+++ b/src/driver/driver.cpp
@@ -94,6 +94,8 @@ DriverStatus EvolutionDriver::Execute() {
   // Defaults must be set across all ranks
   DumpInputParameters();
 
+  DriverStatus driver_status = DriverStatus::complete;
+
   { // Main t < tmax loop region
     PARTHENON_INSTRUMENT
     while (tm.KeepGoing() && signal != OutputSignal::analysis) {
@@ -135,8 +137,10 @@ DriverStatus EvolutionDriver::Execute() {
 
       // TODO(bwibking): check for application debug callback
       // currently hard-coded to check for tiny dt
-      if (tm.dt < 1e-10 * tm.time) {
-	signal = OutputSignal::final;
+      if (tm.dt < 1e-6 * tm.time) {
+	      signal = OutputSignal::final;
+        driver_status = DriverStatus::failed;
+        // do not return here, since we still want to write an output
       }
       
       if (signal == OutputSignal::final) {
@@ -161,14 +165,16 @@ DriverStatus EvolutionDriver::Execute() {
     pmesh->UserWorkAfterLoop(pmesh, pinput, tm);
   }
 
-  DriverStatus status = tm.KeepGoing() ? DriverStatus::timeout : DriverStatus::complete;
+  if (driver_status != DriverStatus::failed) {
+    driver_status = tm.KeepGoing() ? DriverStatus::timeout : DriverStatus::complete;
+  }
   // Do *not* write the "final" output, if this is analysis run.
   // The analysis output itself has already been written above before the main loop.
   if (signal != OutputSignal::analysis) {
     pouts->MakeOutputs(pmesh, pinput, &tm, OutputSignal::final);
   }
-  PostExecute(status);
-  return status;
+  PostExecute(driver_status);
+  return driver_status;
 }
 
 void EvolutionDriver::PostExecute(DriverStatus status) {