aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel
diff options
context:
space:
mode:
Diffstat (limited to 'kernel')
-rw-r--r--kernel/univ.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/kernel/univ.ml b/kernel/univ.ml
index 4bb96820c..5f2f845aa 100644
--- a/kernel/univ.ml
+++ b/kernel/univ.ml
@@ -75,8 +75,7 @@ let super = function
Max ([],[u])
| Max _ ->
anomaly ("Cannot take the successor of a non variable universes:\n"^
- "you are probably typing a type already known to be the type\n"^
- "of a user-provided term; if you really need this, please report")
+ "(maybe a bugged tactic)")
(* Returns the formal universe that is greater than the universes u and v.
Used to type the products. *)