aboutsummaryrefslogtreecommitdiff
path: root/pretyping/evarsolve.ml
diff options
context:
space:
mode:
authorMaxime Dénès2017-07-28 18:23:46 +0200
committerMaxime Dénès2017-07-28 18:23:46 +0200
commite8bb8ea0da02b926e076cf04ea1c82c547a30ea2 (patch)
tree1eadb6305528d826955cecc9b4dd6bcaccc0be86 /pretyping/evarsolve.ml
parent3828267b6dcd60088a11fe0b9613871e4fc7c54f (diff)
parentd9530632321c0b470ece6337cda2cf54d02d61eb (diff)
Merge PR #889: Removing template polymorphism for definitions.
Diffstat (limited to 'pretyping/evarsolve.ml')
-rw-r--r--pretyping/evarsolve.ml6
1 files changed, 0 insertions, 6 deletions
diff --git a/pretyping/evarsolve.ml b/pretyping/evarsolve.ml
index 9f48297613..ef0fb8ea6e 100644
--- a/pretyping/evarsolve.ml
+++ b/pretyping/evarsolve.ml
@@ -34,12 +34,6 @@ let get_polymorphic_positions sigma f =
(match oib.mind_arity with
| RegularArity _ -> assert false
| TemplateArity templ -> templ.template_param_levels)
- | Const (cst, u) ->
- let cb = Global.lookup_constant cst in
- (match cb.const_type with
- | RegularArity _ -> assert false
- | TemplateArity (_, templ) ->
- templ.template_param_levels)
| _ -> assert false
let refresh_universes ?(status=univ_rigid) ?(onlyalg=false) ?(refreshset=false)