From 918bb3ed96f87a6046a8b759af9124d8a806bc51 Mon Sep 17 00:00:00 2001
From: filliatr
Date: Wed, 21 Jun 2000 17:40:14 +0000
Subject: $BINDER -> BINDER

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@517 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 parsing/pcoq.ml4 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/parsing/pcoq.ml4 b/parsing/pcoq.ml4
index f0b13f23e6..f9cd0839fe 100644
--- a/parsing/pcoq.ml4
+++ b/parsing/pcoq.ml4
@@ -138,7 +138,7 @@ let slam_ast (_,fin) id ast =
 let abstract_binder_ast (_,fin as loc) name a b =
   match a with
     | Coqast.Node((deb,_),s,d::l) ->
-	let s' = if s="$BINDER" then name else s in
+	let s' = if s="BINDER" then name else s in
 	Coqast.Node((deb,fin),s', [d; List.fold_right (slam_ast loc) l b])
     | _ -> invalid_arg "Bad usage of $ABSTRACT macro"
 
-- 
cgit v1.2.3