aboutsummaryrefslogtreecommitdiff
path: root/interp
diff options
context:
space:
mode:
authorGaëtan Gilbert2020-03-31 15:21:40 +0200
committerGaëtan Gilbert2020-04-13 21:55:34 +0200
commitee64a71f5e071b7fa0495847388c19d83bc5c9bd (patch)
tree17c919a21a48e65c4e660659c407c63120cc6abc /interp
parentf2cdb87232e3b04cbd1e199833253fb3e38156f8 (diff)
Close #11935: section variables do not have universe instances.
Diffstat (limited to 'interp')
-rw-r--r--interp/constrintern.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/constrintern.ml b/interp/constrintern.ml
index 905d9f1e5b..45255609e0 100644
--- a/interp/constrintern.ml
+++ b/interp/constrintern.ml
@@ -989,7 +989,7 @@ let string_of_ty = function
| Variable -> "var"
let gvar (loc, id) us = match us with
-| None -> DAst.make ?loc @@ GVar id
+| None | Some [] -> DAst.make ?loc @@ GVar id
| Some _ ->
user_err ?loc (str "Variable " ++ Id.print id ++
str " cannot have a universe instance")