From 75f569f35fbbbbab5a4629eaf3385335a3024e0b Mon Sep 17 00:00:00 2001 From: Emilio Jesus Gallego Arias Date: Sun, 11 Mar 2018 03:16:09 +0100 Subject: [vernac] Move `Quit` and `Drop` to the toplevel layer. This is a first step towards moving REPL-specific commands out of the core layers. In particular, we remove `Quit` and `Drop` from the core vernacular to specific toplevel-level parsing rules. --- printing/ppvernac.ml | 6 ------ 1 file changed, 6 deletions(-) (limited to 'printing') diff --git a/printing/ppvernac.ml b/printing/ppvernac.ml index 5c5b7206a..7df0a0c94 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"(* : 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) -- cgit v1.2.3