aboutsummaryrefslogtreecommitdiff
path: root/tactics
diff options
context:
space:
mode:
Diffstat (limited to 'tactics')
-rw-r--r--tactics/tacticals.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/tactics/tacticals.ml b/tactics/tacticals.ml
index 2a21c53ab6..bc7e5f7cda 100644
--- a/tactics/tacticals.ml
+++ b/tactics/tacticals.ml
@@ -345,7 +345,7 @@ module New = struct
| SizeMismatch (i,_)->
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
tclFAIL 0 errmsg
| reraise -> tclZERO reraise
@@ -368,7 +368,7 @@ module New = struct
| SizeMismatch (i,_)->
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
tclFAIL 0 errmsg
| reraise -> tclZERO reraise