diff options
author | 2017-04-26 03:12:21 +0200 | |
---|---|---|
committer | 2017-05-18 04:58:18 +0200 | |
commit | 2e735eb94b7324c0e149fb4e884a7b405581eb4a (patch) | |
tree | a90de9bec28eb0fc651da7ce8e2078d9844af2bd /toplevel | |
parent | 6d770156669dd9868ae7623b8f4302866e2cc8c7 (diff) |
[stm] Tweak debug options.
We allow for a dynamic setting of the STM debug flag, and we print
some more information about the result of `process_transaction`.
We also fix a printing bug due to mixing `Printf` and `Format`, which
are not compatible.
Diffstat (limited to 'toplevel')
-rw-r--r-- | toplevel/coqtop.ml | 1 | ||||
-rw-r--r-- | toplevel/usage.ml | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml index 8f50bfb3d..f1588b768 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -555,6 +555,7 @@ let parse_args arglist = |"-color" -> set_color (next ()) |"-config"|"--config" -> print_config := true |"-debug" -> set_debug () + |"-stm-debug" -> Flags.stm_debug := true |"-emacs" -> set_emacs () |"-filteropts" -> filter_opts := true |"-h"|"-H"|"-?"|"-help"|"--help" -> usage () diff --git a/toplevel/usage.ml b/toplevel/usage.ml index e29048035..feaf207b1 100644 --- a/toplevel/usage.ml +++ b/toplevel/usage.ml @@ -69,6 +69,7 @@ let print_usage_channel co command = \n -boot boot mode (implies -q and -batch)\ \n -bt print backtraces (requires configure debug flag)\ \n -debug debug mode (implies -bt)\ +\n -stm-debug STM debug mode (will trace every transaction) \ \n -emacs tells Coq it is executed under Emacs\ \n -noglob do not dump globalizations\ \n -dump-glob f dump globalizations in file f (to be used by coqdoc)\ |