diff options
| author | Enrico Tassi | 2018-03-26 14:01:52 +0200 |
|---|---|---|
| committer | Enrico Tassi | 2018-03-26 14:01:52 +0200 |
| commit | c1dcb97cf95c10d19f67689108da8726232da4fb (patch) | |
| tree | 54b60698a12d133cccd822f323cec582ac0e9e6a /printing | |
| parent | e128900aee63c972d7977fd47e3fd21649b63409 (diff) | |
| parent | 75f569f35fbbbbab5a4629eaf3385335a3024e0b (diff) | |
Merge PR #6970: [vernac] Move `Quit` and `Drop` to the toplevel layer.
Diffstat (limited to 'printing')
| -rw-r--r-- | printing/ppvernac.ml | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/printing/ppvernac.ml b/printing/ppvernac.ml index 5c5b7206a5..7df0a0c94a 100644 --- a/printing/ppvernac.ml +++ b/printing/ppvernac.ml @@ -181,8 +181,6 @@ open Decl_kinds | BoolValue b -> mt() in pr_printoption a None ++ pr_opt_value b - let pr_topcmd _ = str"(* <Warning> : No printer for toplevel commands *)" - let pr_opt_hintbases l = match l with | [] -> mt() | _ as z -> str":" ++ spc() ++ prlist_with_sep sep str z @@ -1188,10 +1186,6 @@ open Decl_kinds ++ prlist_with_sep sep (pr_comment pr_constr) l) ) - (* Toplevel control *) - | VernacToplevelControl exn -> - return (pr_topcmd exn) - (* For extension *) | VernacExtend (s,c) -> return (pr_extend s c) |