diff options
| author | herbelin | 2007-08-29 13:09:36 +0000 |
|---|---|---|
| committer | herbelin | 2007-08-29 13:09:36 +0000 |
| commit | bfb2e68ff5587b71de525584deab04d4169d29d7 (patch) | |
| tree | 41d1ae2b6ccf0992f7347d670304d4fb8178709a /contrib | |
| parent | e829fb40b1c9f599dd7ad2597b519b4283e9d460 (diff) | |
- Débogueur: positionnement de set_detype_anonymous pour ne pas
échouer sur les Rel liées a des Anonymous et export de l'instance
des evars vers le printeur du débogueur.
- Suppression d'un reste de code mort lié à la V7 dans pretyping.ml.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10102 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/subtac/subtac_utils.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/subtac/subtac_utils.ml b/contrib/subtac/subtac_utils.ml index 2335d3a253..9ebb8774b4 100644 --- a/contrib/subtac/subtac_utils.ml +++ b/contrib/subtac/subtac_utils.ml @@ -163,7 +163,7 @@ let make_existential loc ?(opaque = true) env isevars c = let make_existential_expr loc env c = let key = Evarutil.new_untyped_evar () in - let evar = Topconstr.CEvar (loc, key) in + let evar = Topconstr.CEvar (loc, key, None) in debug 2 (str "Constructed evar " ++ int key); evar |