if (markscan <= PL_markstack + mark_max && *markscan < i) {
do {
++markscan;
- PerlIO_putc(Perl_debug_log, '*');
+ (void)PerlIO_putc(Perl_debug_log, '*');
}
while (markscan <= PL_markstack + mark_max && *markscan < i);
PerlIO_printf(Perl_debug_log, " ");
"DESTROY",
"WARNHOOK",
"DIEHOOK",
- "REQUIRE"
+ "REQUIRE",
+ "MULTICALL"
};
#endif
}
/*
- * Local variables:
- * c-indentation-style: bsd
- * c-basic-offset: 4
- * indent-tabs-mode: nil
- * End:
- *
* ex: set ts=8 sts=4 sw=4 et:
*/