From 30cb11bb9091fbc0301acff61de8764b41ad91a8 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Mon, 5 Feb 2001 23:38:08 +0000
Subject: Restructuration de classops; évolution en une version mieux intégrée
 au reste du système; conséquences collatérales

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

diff --git a/parsing/astterm.ml b/parsing/astterm.ml
index e78ae3cd35..6f2385392b 100644
--- a/parsing/astterm.ml
+++ b/parsing/astterm.ml
@@ -199,7 +199,7 @@ let ref_from_constr c = match kind_of_term c with
   | IsEvar (ev,ctxt) -> REVar (ev, ast_to_constr_ctxt ctxt) 
   | IsMutConstruct (csp,ctxt) -> RConstruct (csp, ast_to_constr_ctxt ctxt)
   | IsMutInd (isp,ctxt) -> RInd (isp, ast_to_constr_ctxt ctxt)
-  | IsVar id -> RVar id  (* utilisé pour coe_value (tmp) *)
+  | IsVar id -> RVar id  (* utilisé pour coercion_value (tmp) *)
   | _ -> anomaly "Not a reference"
 *)
 
-- 
cgit v1.2.3