summaryrefslogtreecommitdiff
path: root/compiler/Invariants.ml
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--compiler/Invariants.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/Invariants.ml b/compiler/Invariants.ml
index c69e6441..981c2c46 100644
--- a/compiler/Invariants.ml
+++ b/compiler/Invariants.ml
@@ -784,7 +784,7 @@ let check_symbolic_values (ctx : C.eval_ctx) : unit =
let check_invariants (ctx : C.eval_ctx) : unit =
if !Config.check_invariants then (
- log#ldebug (lazy "Checking invariants");
+ log#ldebug (lazy ("Checking invariants:\n" ^ eval_ctx_to_string ctx));
check_loans_borrows_relation_invariant ctx;
check_borrowed_values_invariant ctx;
check_typing_invariant ctx;