Extraction: fix a bit the extraction under modules

 Extraction under modules is highly experimental, and just work a bit.
 Don't expect too much of it. With this commit, I simply avoid a few
 "assert false" to occur when we are under modules. But things are
 still quite wrong, for instance with:

 Definition foo.
 Module M.
  Definition bar := foo.
  Recursive Extraction bar.

 Extraction of bar is ok, but foo isn't displayed, since extraction
 can't get it: Lib.contents_after doesn't mention it, it is probably
 in some frozen summary.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13281 85f007b7-540e-0410-9357-904b9bb8a0f7

1 files changed, 1 insertions, 1 deletions

diff --git a/plugins/extraction/table.mli b/plugins/extraction/table.mli
index 18904a8b4..590ee0643 100644
--- a/plugins/extraction/table.mli
+++ b/plugins/extraction/table.mli
@@ -40,6 +40,7 @@ val info_file : string -> unit
 (*s utilities about [module_path] and [kernel_names] and [global_reference] *)
 
 val occur_kn_in_ref : mutual_inductive -> global_reference -> bool
+val repr_of_r : global_reference -> module_path * dir_path * label
 val modpath_of_r : global_reference -> module_path
 val label_of_r : global_reference -> label
 val current_toplevel : unit -> module_path
@@ -49,7 +50,6 @@ val string_of_modfile : module_path -> string
 val file_of_modfile : module_path -> string
 val is_toplevel : module_path -> bool
 val at_toplevel : module_path -> bool
-val visible_kn : kernel_name -> bool
 val visible_con : constant -> bool
 val mp_length : module_path -> int
 val prefixes_mp : module_path -> MPset.t