aboutsummaryrefslogtreecommitdiff
path: root/library/global.ml
diff options
context:
space:
mode:
authorMaxime Dénès2019-10-23 10:01:20 +0200
committerMaxime Dénès2019-10-23 10:01:20 +0200
commita88dec59499afa7fbe01e4bd0e8400aebd5ffbcf (patch)
treeb2d64405d7fbfde84ada7ec7012260be1dd3c51c /library/global.ml
parent1f25366ac049dad2f4fa255f47acf84c3ccb4b02 (diff)
parent593e784250eca0f38479109395a5fbc605f2c3c4 (diff)
Merge PR #10884: Last stop before CEP 40
Reviewed-by: SkySkimmer Reviewed-by: ejgallego Reviewed-by: gares
Diffstat (limited to 'library/global.ml')
-rw-r--r--library/global.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/library/global.ml b/library/global.ml
index 24cfc57f28..98d3e9cb1f 100644
--- a/library/global.ml
+++ b/library/global.ml
@@ -103,7 +103,8 @@ let make_sprop_cumulative () = globalize0 Safe_typing.make_sprop_cumulative
let set_allow_sprop b = globalize0 (Safe_typing.set_allow_sprop b)
let sprop_allowed () = Environ.sprop_allowed (env())
let export_private_constants cd = globalize (Safe_typing.export_private_constants cd)
-let add_constant ~side_effect id d = globalize (Safe_typing.add_constant ~side_effect (i2l id) d)
+let add_constant id d = globalize (Safe_typing.add_constant (i2l id) d)
+let add_private_constant id d = globalize (Safe_typing.add_private_constant (i2l id) d)
let add_mind id mie = globalize (Safe_typing.add_mind (i2l id) mie)
let add_modtype id me inl = globalize (Safe_typing.add_modtype (i2l id) me inl)
let add_module id me inl = globalize (Safe_typing.add_module (i2l id) me inl)