From 49485357eb8cd7f1820bd984f1833282f96cd656 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Wed, 29 May 2002 10:57:51 +0000
Subject: Ajout EVAL

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2723 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 syntax/PPConstr.v | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'syntax')

diff --git a/syntax/PPConstr.v b/syntax/PPConstr.v
index ee259cbfa1..6e17c0d51c 100755
--- a/syntax/PPConstr.v
+++ b/syntax/PPConstr.v
@@ -251,4 +251,12 @@ Syntax constr
   | onecofixdecl [ << (CFDECL $f $A $t) >> ] ->
       [ $f " : "
         [1 2] $A:E " :="
-        [1 2] $t:E ].
+        [1 2] $t:E ]
+  ;
+
+  level 8:
+    evalconstr [ << (EVAL $c $r) >> ] ->
+	 [ [<hv 0> "Eval" [1 1] $r [1 0] "in" [1 1] $c:E ] ].
+
+
+  
-- 
cgit v1.2.3