diff options
| author | Hugo Herbelin | 2014-06-13 10:33:40 +0200 |
|---|---|---|
| committer | Hugo Herbelin | 2014-06-13 12:08:34 +0200 |
| commit | 176f40f976741c8fb6e020c0eaeac4df59a474bc (patch) | |
| tree | 75111a6ff55f049bc01181f7dd60e6c7f7e951ab /pretyping/evd.ml | |
| parent | c06fa8b4c16c35fe48039d5b13e181cca9ebbb51 (diff) | |
Improved error message when a meta posed as an evar remains unsolved
in case prefix 'e' of "apply" and co is not given.
Diffstat (limited to 'pretyping/evd.ml')
| -rw-r--r-- | pretyping/evd.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/pretyping/evd.ml b/pretyping/evd.ml index 2041f35bf0..e36e16c05b 100644 --- a/pretyping/evd.ml +++ b/pretyping/evd.ml @@ -1560,6 +1560,7 @@ let pr_evar_source = function | Evar_kinds.GoalEvar -> str "goal evar" | Evar_kinds.ImpossibleCase -> str "type of impossible pattern-matching clause" | Evar_kinds.MatchingVar _ -> str "matching variable" + | Evar_kinds.VarInstance id -> str "instance of " ++ pr_id id let pr_evar_info evi = let phyps = |