From 392300a73bc4e57d2be865d9a8d77c608ef02f59 Mon Sep 17 00:00:00 2001
From: letouzey
Date: Tue, 29 May 2012 11:08:50 +0000
Subject: New files intf/constrexpr.mli and intf/notation_term.mli out of
 Topconstr

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15375 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 parsing/pptactic.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'parsing/pptactic.ml')

diff --git a/parsing/pptactic.ml b/parsing/pptactic.ml
index 5d03b60288..bbfecac8f9 100644
--- a/parsing/pptactic.ml
+++ b/parsing/pptactic.ml
@@ -13,7 +13,7 @@ open Errors
 open Util
 open Tacexpr
 open Glob_term
-open Topconstr
+open Constrexpr
 open Genarg
 open Libnames
 open Pattern
@@ -294,7 +294,7 @@ let pr_extend prc prlc prtac prpat =
 let strip_prod_binders_expr n ty =
   let rec strip_ty acc n ty =
     match ty with
-        Topconstr.CProdN(_,bll,a) ->
+        Constrexpr.CProdN(_,bll,a) ->
           let nb =
             List.fold_left (fun i (nal,_,_) -> i + List.length nal) 0 bll in
 	  let bll = List.map (fun (x, _, y) -> x, y) bll in
-- 
cgit v1.2.3