diff options
Diffstat (limited to 'interp/modintern.mli')
-rw-r--r-- | interp/modintern.mli | 31 |
1 files changed, 11 insertions, 20 deletions
diff --git a/interp/modintern.mli b/interp/modintern.mli index d832ffc6..8b6d002e 100644 --- a/interp/modintern.mli +++ b/interp/modintern.mli @@ -1,18 +1,15 @@ (************************************************************************) (* v * The Coq Proof Assistant / The Coq Development Team *) -(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *) +(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2015 *) (* \VV/ **************************************************************) (* // * This file is distributed under the terms of the *) (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -open Declarations open Environ open Entries -open Util -open Libnames -open Names -open Topconstr +open Constrexpr +open Misctypes (** Module internalization errors *) @@ -24,17 +21,11 @@ type module_internalization_error = exception ModuleInternalizationError of module_internalization_error (** Module expressions and module types are interpreted relatively to - possible functor or functor signature arguments. *) - -val interp_modtype : env -> module_ast -> module_struct_entry - -val interp_modexpr : env -> module_ast -> module_struct_entry - -(** The following function tries to interprete an ast as a module, - and in case of failure, interpretes this ast as a module type. - The boolean is true for a module, false for a module type *) - -val interp_modexpr_or_modtype : env -> module_ast -> - module_struct_entry * bool - -val lookup_module : qualid located -> module_path + possible functor or functor signature arguments. When the input kind + is ModAny (i.e. module or module type), we tries to interprete this ast + as a module, and in case of failure, as a module type. The returned + kind is never ModAny, and it is equal to the input kind when this one + isn't ModAny. *) + +val interp_module_ast : + env -> module_kind -> module_ast -> module_struct_entry * module_kind |