diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-11-29 11:29:48 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-11-29 11:29:48 +0000 |
commit | c540f6dea7b1a525a4b927a37ffba64d11a8b02a (patch) | |
tree | 8e7fe9e4bf1881ee566b7c8adbf73dec33796def /kernel/typeops.mli | |
parent | 52d04b41a0fba7c9649b45f5684a0318b1004c8b (diff) |
Déplacement du message d'erreur de gen_rel vers l'appelant pour le prétypage
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1011 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/typeops.mli')
-rw-r--r-- | kernel/typeops.mli | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/typeops.mli b/kernel/typeops.mli index 9f2bde9b8..d51594822 100644 --- a/kernel/typeops.mli +++ b/kernel/typeops.mli @@ -55,7 +55,7 @@ val abs_rel : (*s Type of a product. *) val gen_rel : - env -> 'a evar_map -> name -> unsafe_type_judgment -> unsafe_judgment + env -> 'a evar_map -> name -> unsafe_type_judgment -> unsafe_type_judgment -> unsafe_judgment * constraints val sort_of_product : sorts -> sorts -> universes -> sorts * constraints |