From 737faa34acc0858b7c8f766a20b1d0bcedbf36c7 Mon Sep 17 00:00:00 2001 From: letouzey Date: Wed, 5 Mar 2008 10:54:41 +0000 Subject: Attempt of fix for extraction of modules types * When no explicit module type is given in Coq, extraction proceeds with more caution when recontructing a module type from the module. For instance, a module ident isn't keep, since it's the name of an implementation, not of a module type. Fix the bug functor M -> M : funsig M -> M instead of funsig M -> typeof(M) * Removed duplicated code with Modops * The call to replicate_msid doesn't seem to be as crucial as before. Let's try to remove it. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10620 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/modops.mli | 1 + 1 file changed, 1 insertion(+) (limited to 'kernel/modops.mli') diff --git a/kernel/modops.mli b/kernel/modops.mli index 3cb8e47bb..a35e887ea 100644 --- a/kernel/modops.mli +++ b/kernel/modops.mli @@ -28,6 +28,7 @@ val destr_functor : env -> struct_expr_body -> mod_bound_id * struct_expr_body * struct_expr_body val subst_modtype : substitution -> struct_expr_body -> struct_expr_body +val subst_structure : substitution -> structure_body -> structure_body val subst_signature_msid : mod_self_id -> module_path -> -- cgit v1.2.3