diff options
| author | mohring | 2000-12-14 07:42:27 +0000 |
|---|---|---|
| committer | mohring | 2000-12-14 07:42:27 +0000 |
| commit | fdb4e951e25d8e1a87c7ccc32acfdcf8d7737368 (patch) | |
| tree | 12f995cc61c504aca2d04fb903484c2c15a7bc8a /tactics | |
| parent | e166c79cd0dfdcb40693b8e20a96eb9927013df7 (diff) | |
LetIn dans Simpl
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1104 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/equality.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/equality.ml b/tactics/equality.ml index 8a6291c2d5..2108301c37 100644 --- a/tactics/equality.ml +++ b/tactics/equality.ml @@ -932,7 +932,7 @@ let injClause cls gls = with | Not_found -> errorlabstrm "InjClause" (not_found_message id) - | UserError("refiner__FAIL",_) -> + | UserError("refiner__fail",_) -> errorlabstrm "InjClause" [< 'sTR (string_of_id id); 'sTR" Not a projectable equality" >] |