From 0f72b089de52ad7d26d71e56003b140fa5012635 Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Fri, 28 Jul 2017 17:53:42 +0200 Subject: Exporting more internals from Coq implementation. --- src/tac2env.ml | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/tac2env.ml') diff --git a/src/tac2env.ml b/src/tac2env.ml index 2094898ced..a75500eae7 100644 --- a/src/tac2env.ml +++ b/src/tac2env.ml @@ -239,6 +239,9 @@ let interp_ml_object t = MLType.obj t let coq_prefix = MPfile (DirPath.make (List.map Id.of_string ["Init"; "Ltac2"])) +let std_prefix = + MPfile (DirPath.make (List.map Id.of_string ["Std"; "Ltac2"])) + (** Generic arguments *) let wit_ltac2 = Genarg.make0 "ltac2" -- cgit v1.2.3