aboutsummaryrefslogtreecommitdiff
path: root/stm/stm.ml
diff options
context:
space:
mode:
Diffstat (limited to 'stm/stm.ml')
-rw-r--r--stm/stm.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/stm.ml b/stm/stm.ml
index ffd13fcb73..c9b1695407 100644
--- a/stm/stm.ml
+++ b/stm/stm.ml
@@ -757,7 +757,7 @@ end = struct (* {{{ *)
end
let print ?(now=false) () =
- if not !Flags.debug && not now then () else NB.command ~now (print_dag !vcs)
+ if !Flags.debug then NB.command ~now (print_dag !vcs)
let backup () = !vcs
let restore v = vcs := v