From 77b71db8470553aed0476827ec2e39aed0cbb6ed Mon Sep 17 00:00:00 2001 From: letouzey Date: Sun, 17 Jan 2010 13:31:10 +0000 Subject: Variant !F M for functor application that does not honor the Inline declarations For F(X:T), the application !F M works as F M, except that if module type T contains some "Inline" annotations, they are not taken in account when substituting X with M in F. See forthcoming commits for examples of use for this feature. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12678 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/mod_typing.mli | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'kernel/mod_typing.mli') diff --git a/kernel/mod_typing.mli b/kernel/mod_typing.mli index 746a80e151..63f7696c48 100644 --- a/kernel/mod_typing.mli +++ b/kernel/mod_typing.mli @@ -17,20 +17,20 @@ open Names (*i*) -val translate_module : env -> module_path -> module_entry +val translate_module : env -> module_path -> bool -> module_entry -> module_body -val translate_module_type : env -> module_path -> module_struct_entry -> +val translate_module_type : env -> module_path -> bool -> module_struct_entry -> module_type_body -val translate_struct_module_entry : env -> module_path -> module_struct_entry -> +val translate_struct_module_entry : env -> module_path -> bool -> module_struct_entry -> struct_expr_body * struct_expr_body * delta_resolver * Univ.constraints -val translate_struct_type_entry : env -> module_struct_entry -> +val translate_struct_type_entry : env -> bool -> module_struct_entry -> struct_expr_body * struct_expr_body option * delta_resolver * module_path * Univ.constraints val translate_struct_include_module_entry : env -> module_path - -> module_struct_entry -> struct_expr_body * delta_resolver * Univ.constraints + -> bool -> module_struct_entry -> struct_expr_body * delta_resolver * Univ.constraints val add_modtype_constraints : env -> module_type_body -> env -- cgit v1.2.3