diff options
| author |  soubiran <soubiran@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-06-10 14:54:40 +0000 |
|---|---|---|
| committer | soubiran <soubiran@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-06-10 14:54:40 +0000 |
| commit | c702789588f6673a847312e5dab8ea998c80597b (patch) | |
| tree | fa51c59bfa5cc0e5dd29e0a12caa48d5d1cecf2c /kernel/safe_typing.ml | |
| parent | d8be960b16a000139df0cab3aca6274ca6c64447 (diff) | |
correction d'un bug sur la commande Include.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11088 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/safe_typing.ml')
| -rw-r--r-- | kernel/safe_typing.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/safe_typing.ml b/kernel/safe_typing.ml index c39a42646..5edc73602 100644 --- a/kernel/safe_typing.ml +++ b/kernel/safe_typing.ml @@ -509,7 +509,7 @@ let end_module l restype senv = env = env'; modinfo = senv.modinfo; labset = Labset.add l senv.labset; - revstruct = (l,SFBalias (mp,cst))::senv.revstruct; + revstruct = (l,SFBalias (mp',cst))::senv.revstruct; univ = senv.univ; engagement = senv.engagement; imports = senv.imports; |