aboutsummaryrefslogtreecommitdiff
path: root/library/lib.ml
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2019-10-04 17:55:25 +0200
committerPierre-Marie Pédrot2019-10-04 17:55:25 +0200
commita8ab4cc9bfa9d31ac08b0ae3e3f318578ce50e2a (patch)
tree2040f56dd268a35db0aecf9d98470f42303237a4 /library/lib.ml
parent87c17a6871ef4c21ff86a050297d33738c5a870a (diff)
parent994edaf989c0232b5c7de70a2f8ccb46c557da95 (diff)
Merge PR #10798: Loosen restrictions on mixing universe mono/polymorphism in sections
Reviewed-by: ppedrot
Diffstat (limited to 'library/lib.ml')
-rw-r--r--library/lib.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/library/lib.ml b/library/lib.ml
index 1c6f82e8a6..991e23eb3a 100644
--- a/library/lib.ml
+++ b/library/lib.ml
@@ -464,8 +464,8 @@ let section_instance = let open GlobRef in function
(*************)
(* Sections. *)
-let open_section ~poly id =
- let () = Global.open_section ~poly in
+let open_section id =
+ let () = Global.open_section () in
let opp = !lib_state.path_prefix in
let obj_dir = add_dirpath_suffix opp.Nametab.obj_dir id in
let prefix = Nametab.{ obj_dir; obj_mp = opp.obj_mp; obj_sec = add_dirpath_suffix opp.obj_sec id } in