Restrict the change of cleanup reason

electric-sql · Dec 7, 2021 · 55109e7 · 55109e7
1 parent 90db487
commit 55109e7
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/src/lux_interpret.erl b/src/lux_interpret.erl
@@ -1179,7 +1179,13 @@ prepare_result(#istate{mode = Mode,
             #result{outcome = relax} ->
                 {OrigCleanupReason, Res#result{outcome = shutdown}};
             #result{outcome = NewOutcome} ->
-                {NewOutcome, Res};
+                NewCleanupReason =
+                    if
+                        OrigCleanupReason =:= fail -> fail;
+                        NewOutcome        =:= fail -> fail;
+                        true                       -> success
+                    end,
+                {NewCleanupReason, Res};
             {'EXIT', {error, FailReason}} ->
                 fail_result(LatestCmd, PosStack, ActiveName, FailReason);
             {fail, FailReason} ->