diff options
| author | SimonBoulier | 2018-11-05 11:45:47 +0100 |
|---|---|---|
| committer | SimonBoulier | 2019-08-16 11:43:51 +0200 |
| commit | 33f7877dc675cd1c2ce5ffd8da04e65b4d029676 (patch) | |
| tree | a59cd301dd693382aba593825309a7e214ea21f0 /printing/printer.ml | |
| parent | bc4560fa6c88aadcb2ee8312a950a7ce17fc33ee (diff) | |
Add [Print Typing Flags] command.
Diffstat (limited to 'printing/printer.ml')
| -rw-r--r-- | printing/printer.ml | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/printing/printer.ml b/printing/printer.ml index ec1b9b8e49..9c74d8cfbb 100644 --- a/printing/printer.ml +++ b/printing/printer.ml @@ -1003,3 +1003,8 @@ let print_and_diff oldp newp = pr_open_subgoals ~proof in Feedback.msg_notice output;; + +let pr_typing_flags flags = + str "check_guarded: " ++ bool flags.check_guarded ++ fnl () + ++ str "check_positive: " ++ bool flags.check_positive ++ fnl () + ++ str "check_universes: " ++ bool flags.check_universes |