From 982c1ae49d200f782a5b82f53164d68418a77387 Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Fri, 6 Sep 2013 22:01:36 +0200 Subject: Adding the necessary hooks to handle tactics in terms. --- interp/genintern.ml | 2 ++ 1 file changed, 2 insertions(+) (limited to 'interp/genintern.ml') diff --git a/interp/genintern.ml b/interp/genintern.ml index 86a1ce1f5..d1bc28333 100644 --- a/interp/genintern.ml +++ b/interp/genintern.ml @@ -54,3 +54,5 @@ let register_subst0 = Subst.register0 let generic_substitute subs v = let unpack wit v = in_gen (glbwit wit) (substitute wit subs v) in glb_unpack { glb_unpack = unpack; } v + +let () = Hook.set Detyping.subst_genarg_hook generic_substitute -- cgit v1.2.3