diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-06-14 15:41:18 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-06-14 15:41:18 +0000 |
commit | 4c5baa34e6fd790197c7bd6297b98ff63031d1fa (patch) | |
tree | 7343660c93ef611da00ad10fc838bd8be6c86c40 /interp/modintern.ml | |
parent | 092872618ffbeb3d6dbcae6770cbb3c7b53fa7a2 (diff) |
Correction bug 1878 (utilisation de extend_evar déplacée là où une
restriction du contexte était attendue) + suppression warning +
amélioration affichage en cas de clause "at" incorrecte + report
commit 11121 (correction bug 1367) de la 8.2 vers le trunk.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11128 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'interp/modintern.ml')
-rw-r--r-- | interp/modintern.ml | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/interp/modintern.ml b/interp/modintern.ml index cd55ec74d..0af11bad9 100644 --- a/interp/modintern.ml +++ b/interp/modintern.ml @@ -76,7 +76,6 @@ let split_modpath mp = let dump_moddef loc mp ty = if !Flags.dump then let (dp, l) = split_modpath mp in - let fp = string_of_dirpath dp in let mp = string_of_dirpath (make_dirpath l) in Flags.dump_string (Printf.sprintf "%s %d %s %s\n" ty (fst (unloc loc)) "<>" mp) |