aboutsummaryrefslogtreecommitdiff
path: root/printing/ppconstr.ml
diff options
context:
space:
mode:
authorMaxime Dénès2018-06-01 13:49:34 +0200
committerMaxime Dénès2018-06-01 13:49:34 +0200
commit3a36761a27487e8917e1b59b59abacc2a7e65b95 (patch)
treef1cd9d412c40933ff3e87f720dbd8e7cba7f9bbf /printing/ppconstr.ml
parentac0bb15616550d00f5e6e7d6239e3b7ff2632975 (diff)
parent63b530234e0b19323a50c52434a7439518565c81 (diff)
Merge PR #7570: [api] Move `Constrexpr` to the `interp` module.
Diffstat (limited to 'printing/ppconstr.ml')
-rw-r--r--printing/ppconstr.ml4
1 files changed, 1 insertions, 3 deletions
diff --git a/printing/ppconstr.ml b/printing/ppconstr.ml
index 2a5f38697f..e877b3c63d 100644
--- a/printing/ppconstr.ml
+++ b/printing/ppconstr.ml
@@ -19,7 +19,7 @@ open Constr
open Libnames
open Pputils
open Ppextend
-open Notation_term
+open Notation_gram
open Constrexpr
open Constrexpr_ops
open Decl_kinds
@@ -88,8 +88,6 @@ let tag_var = tag Tag.variable
| Numeral (_,b) -> if b then lposint else lnegint
| String _ -> latom
- open Notation
-
let print_hunks n pr pr_patt pr_binders (terms, termlists, binders, binderlists) unps =
let env = ref terms and envlist = ref termlists and bl = ref binders and bll = ref binderlists in
let pop r = let a = List.hd !r in r := List.tl !r; a in