aboutsummaryrefslogtreecommitdiff
path: root/library/global.ml
diff options
context:
space:
mode:
authorMaxime Dénès2018-10-31 16:09:43 +0100
committerMaxime Dénès2018-10-31 16:16:41 +0100
commitc3ea3cd8a2bd29fc0129e34af4a1689bbf7519a5 (patch)
treec4abbf08afd6f11a96b28f31e06571a10f12dac7 /library/global.ml
parentd1091555104e0198eaaa94a1bb69e96d5cc73447 (diff)
Introduce Safe_typing.set_share_reduction
Diffstat (limited to 'library/global.ml')
-rw-r--r--library/global.ml3
1 files changed, 3 insertions, 0 deletions
diff --git a/library/global.ml b/library/global.ml
index 009f498a9e..6461b4c37f 100644
--- a/library/global.ml
+++ b/library/global.ml
@@ -183,3 +183,6 @@ let register_inline c = globalize0 (Safe_typing.register_inline c)
let set_strategy k l =
GlobalSafeEnv.set_safe_env (Safe_typing.set_strategy (safe_env ()) k l)
+
+let set_share_reduction b =
+ globalize0 (Safe_typing.set_share_reduction b)