Merge pull request #12517 from xavierleroy/constant-logical-operand

Avoid the "constant-logical-operand" warning of recent clang versions
ocaml-flambda · Aug 31, 2023 · a3a82ee · a3a82ee
2 parents 15ef93c + fb7d41b
commit a3a82ee
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/runtime/printexc.c b/runtime/printexc.c
@@ -130,7 +130,7 @@ static void default_fatal_uncaught_exception(value exn)
   fprintf(stderr, "Fatal error: exception %s\n", msg);
   caml_stat_free(msg);
   /* Display the backtrace if available */
-  if (Caml_state->backtrace_active && !DEBUGGER_IN_USE)
+  if (!DEBUGGER_IN_USE && Caml_state->backtrace_active)
     caml_print_exception_backtrace();
 }