diff options
| author | Emilio Jesus Gallego Arias | 2017-06-11 06:40:29 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2017-06-20 11:21:29 +0200 |
| commit | 21f8312738f324d1c55e4ed7c451b642c9da70e6 (patch) | |
| tree | 360baca5c139ed4fe1a8d3d2b1af75c91ef2e6d7 /vernac/command.ml | |
| parent | d30ed5fe0694466f70eed51bc689cd0fa8c00da5 (diff) | |
[vernac] Remove unused hooks.
These hooks are not used (leftovers?) and IMHO they should not be.
Diffstat (limited to 'vernac/command.ml')
| -rw-r--r-- | vernac/command.ml | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/vernac/command.ml b/vernac/command.ml index 4064773561..68fa8ab888 100644 --- a/vernac/command.ml +++ b/vernac/command.ml @@ -167,10 +167,6 @@ let declare_global_definition ident ce local k pl imps = let () = definition_message ident in gr -let declare_definition_hook = ref ignore -let set_declare_definition_hook = (:=) declare_definition_hook -let get_declare_definition_hook () = !declare_definition_hook - let warn_definition_not_visible = CWarnings.create ~name:"definition-not-visible" ~category:"implicits" (fun ident -> @@ -179,7 +175,6 @@ let warn_definition_not_visible = let declare_definition ident (local, p, k) ce pl imps hook = let fix_exn = Future.fix_exn_of ce.const_entry_body in - let () = !declare_definition_hook ce in let r = match local with | Discharge when Lib.sections_are_opened () -> let c = SectionLocalDef ce in |