diff options
Diffstat (limited to 'interp/genintern.ml')
-rw-r--r-- | interp/genintern.ml | 2 |
1 files changed, 2 insertions, 0 deletions
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 |