| 12345678910111213141516171819202122232425262728293031323334 |
- Index: src/main/errors.c
- --- src/main/errors.c.orig 2005-06-12 10:47:32 +0200
- +++ src/main/errors.c 2005-06-25 13:53:16 +0200
- @@ -354,8 +354,12 @@
- cntxt.cend = &cleanup_PrintWarnings;
-
- inPrintWarnings = 1;
- +#ifdef ENABLE_NLS
- header = ngettext("Warning message:\n", "Warning messages:\n",
- R_CollectWarnings);
- +#else
- + header = "Warning message:\n";
- +#endif
- if( R_CollectWarnings == 1 ) {
- REprintf(header);
- names = CAR(ATTRIB(R_Warnings));
- Index: src/main/util.c
- --- src/main/util.c.orig 2005-06-12 10:47:32 +0200
- +++ src/main/util.c 2005-06-25 13:54:52 +0200
- @@ -803,9 +803,13 @@
- void checkArity(SEXP op, SEXP args)
- {
- if (PRIMARITY(op) >= 0 && PRIMARITY(op) != length(args))
- +#ifdef ENABLE_NLS
- error(ngettext("%d argument passed to '%s' which requires %d",
- "%d arguments passed to '%s' which requires %d",
- length(args)),
- +#else
- + error("%d argument passed to '%s' which requires %d",
- +#endif
- length(args), PRIMNAME(op), PRIMARITY(op));
- }
-
|