Les tables de coercions ne doivent pas survivre aux sections

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1833 85f007b7-540e-0410-9357-904b9bb8a0f7

2 files changed, 2 insertions, 2 deletions

diff --git a/pretyping/classops.ml b/pretyping/classops.ml
index de1205a028..8cbfcc0a5b 100755
--- a/pretyping/classops.ml
+++ b/pretyping/classops.ml
@@ -193,7 +193,7 @@ let _ =
     { Summary.freeze_function = freeze;
       Summary.unfreeze_function = unfreeze;
       Summary.init_function = init;
-      Summary.survive_section = true }
+      Summary.survive_section = false }
 
 (* classe d'un terme *)
 
diff --git a/pretyping/recordops.ml b/pretyping/recordops.ml
index c8c43a2459..cabdaa62c7 100755
--- a/pretyping/recordops.ml
+++ b/pretyping/recordops.ml
@@ -114,4 +114,4 @@ let _ =
     { Summary.freeze_function = freeze;
       Summary.unfreeze_function = unfreeze;
       Summary.init_function = init;
-      Summary.survive_section = true }
+      Summary.survive_section = false }