summaryrefslogtreecommitdiff
path: root/tcl/unix/tclLoadAix.c
diff options
context:
space:
mode:
Diffstat (limited to 'tcl/unix/tclLoadAix.c')
-rw-r--r--tcl/unix/tclLoadAix.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/tcl/unix/tclLoadAix.c b/tcl/unix/tclLoadAix.c
index 5d55f5a474e..c46424132a4 100644
--- a/tcl/unix/tclLoadAix.c
+++ b/tcl/unix/tclLoadAix.c
@@ -213,7 +213,7 @@ static void caterr(char *s)
while (*p >= '0' && *p <= '9')
p++;
- switch(atoi(s)) {
+ switch(atoi(s)) { /* INTL: "C", UTF safe. */
case L_ERROR_TOOMANY:
strcat(errbuf, "to many errors");
break;
@@ -234,7 +234,7 @@ static void caterr(char *s)
strcat(errbuf, p);
break;
case L_ERROR_ERRNO:
- strcat(errbuf, strerror(atoi(++p)));
+ strcat(errbuf, strerror(atoi(++p))); /* INTL: "C", UTF safe. */
break;
default:
strcat(errbuf, s);
@@ -547,3 +547,4 @@ static void * findMain(void)
return ret;
}
+