From bfa24f9435d5ebeb9c5abb81b8ae0ef7e305f83f Mon Sep 17 00:00:00 2001 From: Emilio Jesus Gallego Arias Date: Mon, 5 Mar 2018 23:48:50 +0100 Subject: [coq] Adapt to correct LTAC module packing coq/coq#6869 --- src/tac2core.ml | 2 +- src/tac2quote.mli | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/tac2core.ml b/src/tac2core.ml index c16e72b801..62fc9db292 100644 --- a/src/tac2core.ml +++ b/src/tac2core.ml @@ -997,7 +997,7 @@ let () = let () = let e = Tac2entries.Pltac.tac2expr in - let inject (loc, v) = Tacexpr.TacGeneric (in_gen (rawwit wit_ltac2) v) in + let inject (loc, v) = Ltac_plugin.Tacexpr.TacGeneric (in_gen (rawwit wit_ltac2) v) in Ltac_plugin.Tacentries.create_ltac_quotation "ltac2" inject (e, None) let () = diff --git a/src/tac2quote.mli b/src/tac2quote.mli index 3f6c9a55e5..1f22fe6c74 100644 --- a/src/tac2quote.mli +++ b/src/tac2quote.mli @@ -99,4 +99,4 @@ val wit_constr : (Constrexpr.constr_expr, Glob_term.glob_constr) Arg.tag val wit_open_constr : (Constrexpr.constr_expr, Glob_term.glob_constr) Arg.tag -val wit_ltac1 : (Tacexpr.raw_tactic_expr, Tacexpr.glob_tactic_expr) Arg.tag +val wit_ltac1 : (Ltac_plugin.Tacexpr.raw_tactic_expr, Ltac_plugin.Tacexpr.glob_tactic_expr) Arg.tag -- cgit v1.2.3