diff options
| author | herbelin | 2002-06-06 14:06:32 +0000 |
|---|---|---|
| committer | herbelin | 2002-06-06 14:06:32 +0000 |
| commit | bf1cf405edf4d718bd93494a4ebc26e6f7ea7c63 (patch) | |
| tree | a7f63b3d4c702b6911b605a4592c05af3527a617 | |
| parent | 9be8a1686d6e68fadbd99bf2c98dd2a2b657ee73 (diff) | |
Correction non reconnaissance des variables de section dans les afficheurs de Z et R
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2760 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | theories/Reals/Rsyntax.v | 1 | ||||
| -rw-r--r-- | theories/ZArith/Zsyntax.v | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/theories/Reals/Rsyntax.v b/theories/Reals/Rsyntax.v index 4f0dc8c73c..e13bf9228e 100644 --- a/theories/Reals/Rsyntax.v +++ b/theories/Reals/Rsyntax.v @@ -147,6 +147,7 @@ Syntax constr level 3: rvar_inside [<<(REXPR ($VAR $i))>>] -> [$i] + | rsecvar_inside [<<(REXPR (SECVAR $i))>>] -> [(SECVAR $i)] | rconst_inside [<<(REXPR (CONST $c))>>] -> [(CONST $c)] | rmutind_inside [<<(REXPR (MUTIND $i $n))>>] -> [(MUTIND $i $n)] diff --git a/theories/ZArith/Zsyntax.v b/theories/ZArith/Zsyntax.v index 33c4130cab..a635032493 100644 --- a/theories/ZArith/Zsyntax.v +++ b/theories/ZArith/Zsyntax.v @@ -162,6 +162,7 @@ Syntax constr level 3: var_inside [ << (ZEXPR ($VAR $i)) >> ] -> [$i] + | secvar_inside [ << (ZEXPR (SECVAR $i)) >> ] -> [(SECVAR $i)] | const_inside [ << (ZEXPR (CONST $c)) >> ] -> [(CONST $c)] | mutind_inside [ << (ZEXPR (MUTIND $i $n)) >> ] -> [(MUTIND $i $n)] |