diff options
| author | Hugo Herbelin | 2018-05-25 16:11:56 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2018-07-04 12:52:38 +0200 |
| commit | b9ad51bb8aa4fbd1bd54314797428a1a0ae19fde (patch) | |
| tree | 72b850dc2394167c248b8e629b80303fbf7cc499 /src | |
| parent | 888479b3514d714253d789d9ed054eaf422f5e14 (diff) | |
Adapting to move of register_constr_interp0 from Pretyping to GlobEnv.
Diffstat (limited to 'src')
| -rw-r--r-- | src/tac2core.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/tac2core.ml b/src/tac2core.ml index 13265ee080..d745d52c82 100644 --- a/src/tac2core.ml +++ b/src/tac2core.ml @@ -974,7 +974,7 @@ let () = let c, sigma = Pfedit.refine_by_tactic env sigma concl tac in (EConstr.of_constr c, sigma) in - Pretyping.register_constr_interp0 wit_ltac2 interp + GlobEnv.register_constr_interp0 wit_ltac2 interp let () = let interp ist env sigma concl id = @@ -984,7 +984,7 @@ let () = let sigma = Typing.check env sigma c concl in (c, sigma) in - Pretyping.register_constr_interp0 wit_ltac2_quotation interp + GlobEnv.register_constr_interp0 wit_ltac2_quotation interp let () = let pr_raw id = Genprint.PrinterBasic mt in |