diff options
| author | herbelin | 2004-03-17 00:00:41 +0000 |
|---|---|---|
| committer | herbelin | 2004-03-17 00:00:41 +0000 |
| commit | 0cbcf76dc9ffa1f71c6aa5a8f255c9a3225163cc (patch) | |
| tree | f063008bdc359c49f486b1eeda71e6b04e3c556a /interp/ppextend.ml | |
| parent | e607a6c08a011f66716969215ddb0e7776e86c60 (diff) | |
Mise en place de motifs récursifs dans Notation; quelques simplifications au passage
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5510 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'interp/ppextend.ml')
| -rw-r--r-- | interp/ppextend.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/interp/ppextend.ml b/interp/ppextend.ml index 713306690b..bbaf399b09 100644 --- a/interp/ppextend.ml +++ b/interp/ppextend.ml @@ -51,7 +51,8 @@ let ppcmd_of_cut = function | PpTbrk(n1,n2) -> tbrk(n1,n2) type unparsing = - | UnpMetaVar of tolerability + | UnpMetaVar of int * parenRelation + | UnpListMetaVar of int * parenRelation * unparsing list | UnpTerminal of string | UnpBox of ppbox * unparsing list | UnpCut of ppcut |