diff options
| author | Hugo Herbelin | 2014-11-02 11:51:20 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2014-11-02 19:58:03 +0100 |
| commit | eb863af14628cd13ceb455c406937c717c8d3ee5 (patch) | |
| tree | 5a2e225ac8647190d79dca03ed86b67fb406cda6 /proofs | |
| parent | 81848583bdbc21564e4b2c8d308dd0b6add0bf38 (diff) | |
Plural and singular forms in error messages.
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/proofview.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/proofview.ml b/proofs/proofview.ml index 0a03965f1d..7ab7e882ce 100644 --- a/proofs/proofview.ml +++ b/proofs/proofview.ml @@ -368,7 +368,7 @@ let _ = Errors.register_handler begin function let open Pp in let errmsg = str"Incorrect number of goals" ++ spc() ++ - str"(expected "++int i++str" tactics)." + str"(expected "++int i++str(String.plural i " tactic") ++ str")." in Errors.errorlabstrm "" errmsg | _ -> raise Errors.Unhandled |