diff options
| author |  msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-05-05 12:09:27 +0000 |
|---|---|---|
| committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-05-05 12:09:27 +0000 |
| commit | 909c945e02ecc07b15ab2f41595bb2ec2ad97abc (patch) | |
| tree | 7914c0bfda44625c6a387ff8e4caefc49a6e0b26 | |
| parent | ce36fb68500966c9eed8f54943f62d8b31edda5c (diff) | |
Fix merge, Cumul moved to CUMUL
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14093 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | pretyping/unification.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/unification.ml b/pretyping/unification.ml index c76055d4f..9e1ccd026 100644 --- a/pretyping/unification.ml +++ b/pretyping/unification.ml @@ -631,7 +631,7 @@ let unify_to_type env sigma flags c status u = let c = refresh_universes c in let t = get_type_of env sigma c in let t = nf_betaiota sigma (nf_meta sigma t) in - unify_0 env sigma Cumul flags t u + unify_0 env sigma CUMUL flags t u let unify_type env sigma flags mv status c = let mvty = Typing.meta_type sigma mv in |