From ca04c9042de024eb559e7841dfce1cf67056a145 Mon Sep 17 00:00:00 2001 From: letouzey Date: Fri, 15 Apr 2011 16:46:18 +0000 Subject: Extraction: nicer error when a toplevel module has no body (#2525) I thought this situation wasn't possible, hence the Option.get. But it's apparently legal to use Declare Module anywhere, even outside a Module Type. No idea on how to handle that at extraction for the moment, hence a proper "unsupported" error message. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14013 85f007b7-540e-0410-9357-904b9bb8a0f7 --- plugins/extraction/table.mli | 1 + 1 file changed, 1 insertion(+) (limited to 'plugins/extraction/table.mli') diff --git a/plugins/extraction/table.mli b/plugins/extraction/table.mli index dc07349ca..ce57a7840 100644 --- a/plugins/extraction/table.mli +++ b/plugins/extraction/table.mli @@ -28,6 +28,7 @@ val error_constant : global_reference -> 'a val error_inductive : global_reference -> 'a val error_nb_cons : unit -> 'a val error_module_clash : module_path -> module_path -> 'a +val error_no_module_expr : module_path -> 'a val error_unknown_module : qualid -> 'a val error_scheme : unit -> 'a val error_not_visible : global_reference -> 'a -- cgit v1.2.3