diff options
Diffstat (limited to 'toplevel/vernacentries.ml')
| -rw-r--r-- | toplevel/vernacentries.ml | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index fbe75eb9d4..fbc9dc1522 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -1021,19 +1021,6 @@ let _ = mSG (print_safe_judgment env j)) | _ -> bad_vernac_args "Check") -(*** -let _ = - add "PrintExtractId" - (function - | [VARG_IDENTIFIER id] -> (fun () -> mSG(print_extracted_name id)) - | _ -> bad_vernac_args "PrintExtractId") - -let _ = - add "PrintExtract" - (function - | [] -> (fun () -> mSG(print_extraction ())) - | _ -> bad_vernac_args "PrintExtract") - ***) let extract_qualid = function | VARG_QUALID qid -> |