aboutsummaryrefslogtreecommitdiff
path: root/kernel/inductive.ml
diff options
context:
space:
mode:
authorcoqbot-app[bot]2021-04-14 16:19:19 +0000
committerGitHub2021-04-14 16:19:19 +0000
commit00391bd681098132cc89c356d1d27334d257fc8b (patch)
tree9bb7bc653fd98b120ab5f80e2475141f85ad841f /kernel/inductive.ml
parent90a6c01dec9d58fa409e7097ac5ba03f08a9ae7b (diff)
parent8df5a37d934b4f862a6183ee451c6bb34ae72d94 (diff)
Merge PR #14050: Remove remote counter system
Reviewed-by: gares Ack-by: ppedrot Ack-by: ejgallego
Diffstat (limited to 'kernel/inductive.ml')
-rw-r--r--kernel/inductive.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/inductive.ml b/kernel/inductive.ml
index 6cb61174d3..ddbd5fa0a7 100644
--- a/kernel/inductive.ml
+++ b/kernel/inductive.ml
@@ -717,7 +717,7 @@ let rec ienv_decompose_prod (env,_ as ienv) n c =
ienv_decompose_prod ienv' (n-1) b
| _ -> assert false
-let dummy_univ = Level.(make (UGlobal.make (DirPath.make [Id.of_string "implicit"]) 0))
+let dummy_univ = Level.(make (UGlobal.make (DirPath.make [Id.of_string "implicit"]) "" 0))
let dummy_implicit_sort = mkType (Universe.make dummy_univ)
let lambda_implicit_lift n a =
let anon = Context.make_annot Anonymous Sorts.Relevant in