/* Formats aren't yet marked for locales, so assume "yes". */
{
DECLARE_STORE_LC_NUMERIC_SET_TO_NEEDED();
- arg &= ~(FORM_NUM_POINT|FORM_NUM_BLANK);
+ arg &= ~(FORM_NUM_POINT|FORM_NUM_BLANK);
/* we generate fmt ourselves so it is safe */
GCC_DIAG_IGNORE(-Wformat-nonliteral);
- my_snprintf(t, SvLEN(PL_formtarget) - (t - SvPVX(PL_formtarget)), fmt, (int) fieldsize, (int) arg, value);
+ PERL_UNUSED_RESULT(my_snprintf(t, SvLEN(PL_formtarget) - (t - SvPVX(PL_formtarget)), fmt, (int) fieldsize, (int) arg, value));
GCC_DIAG_RESTORE;
RESTORE_LC_NUMERIC();
}
d += 5;
while (str < str_end) {
char hex_string[4];
- my_snprintf(hex_string, sizeof(hex_string),
- "%02X.", (U8) *str);
+ PERL_UNUSED_RESULT(
+ my_snprintf(hex_string,
+ sizeof(hex_string),
+ "%02X.", (U8) *str));
Copy(hex_string, d, 3, char);
d += 3;
str++;
if (!PL_in_my_stash) {
char tmpbuf[1024];
PL_bufptr = s;
- my_snprintf(tmpbuf, sizeof(tmpbuf), "No such class %.1000s", PL_tokenbuf);
+ PERL_UNUSED_RESULT(my_snprintf(tmpbuf, sizeof(tmpbuf), "No such class %.1000s", PL_tokenbuf));
yyerror_pv(tmpbuf, UTF ? SVf_UTF8 : 0);
}
}