From ea1cb421a9891df15cc8e60f130fc329a11c8d3a Mon Sep 17 00:00:00 2001 From: herbelin Date: Fri, 6 Oct 2006 08:31:08 +0000 Subject: 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 --- interp/topconstr.ml | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'interp/topconstr.ml') 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 -- cgit v1.2.3