unify error messages

git-svn-id: https://svn.r-project.org/R/trunk@87853 00db46b3-68df-0310-9c12-caf00c1e9a41

Author: ripley

src/main/coerce.c

@@ -1829,15 +1829,15 @@ Rboolean asRbool(SEXP x, SEXP call)
 {
     int ans = asLogical2(x, 1, call);
     if (ans == NA_LOGICAL)
-	errorcall(call, _("NA in coercion to Rboolean"));
+	errorcall(call, _("NA in coercion to boolean"));
     return (Rboolean) ans;
 }
 
 bool asBool2(SEXP x, SEXP call)
 {
     int ans = asLogical2(x, 1, call);
     if (ans == NA_LOGICAL)
-	errorcall(call, _("NA in coercion to bool"));
+	errorcall(call, _("NA in coercion to boolean"));
     return (bool) ans;
 }
 
@@ -1846,15 +1846,15 @@ Rboolean asRboolean(SEXP x)
 {
     int ans = asLogical2(x, 1, R_NilValue);
     if (ans == NA_LOGICAL)
-	error(_("NA in coercion to Rboolean"));
+	error(_("NA in coercion to boolean"));
     return (Rboolean) ans;
 }
 
 bool asBool(SEXP x)
 {
     int ans = asLogical2(x, 1, R_NilValue);
     if (ans == NA_LOGICAL)
-	error(_("NA in coercion to bool"));
+	error(_("NA in coercion to boolean"));
     return (bool) ans;
 }