diff options
| author | herbelin | 2006-10-06 08:31:08 +0000 |
|---|---|---|
| committer | herbelin | 2006-10-06 08:31:08 +0000 |
| commit | ea1cb421a9891df15cc8e60f130fc329a11c8d3a (patch) | |
| tree | 5a5e166b452423d19ff4b9d64ad25079bcdec0b6 /interp/topconstr.ml | |
| parent | e4c48f3da68f3c3f8d0e9dada278120004eb8970 (diff) | |
Annulation de l'essai de changement de sémantique du %scope (révision 9208).
Retour à une sémantique où les %scope s'appliquent à la
sous-expression complète (trop de pbs: constantes polymorphes sans
arguments scope, variables locales de type fonctionnel, ...).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9218 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'interp/topconstr.ml')
| -rw-r--r-- | interp/topconstr.ml | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/interp/topconstr.ml b/interp/topconstr.ml index c9ae593afd..213b9a48e9 100644 --- a/interp/topconstr.ml +++ b/interp/topconstr.ml @@ -480,9 +480,7 @@ and match_equations alp metas sigma (_,_,patl1,rhs1) (_,patl2,rhs2) = type scope_name = string -type tmp_scope_name = - | LightTmpScope of scope_name - | ExplicitTmpScope of scope_name +type tmp_scope_name = scope_name type interpretation = (identifier * (tmp_scope_name option * scope_name list)) list * aconstr |