Branch Coverage

lib/PerlIO/buffersize.xs
Criterion Covered Total %
branch 9 24 37.5


line true false branch
9 0 1 if (!(PerlIOBase(f)->tab->kind & PERLIO_K_BUFFERED))
11 1 0 else if (!arg || !SvOK(arg))
0 1 else if (!arg || !SvOK(arg))
0 0 else if (!arg || !SvOK(arg))
0 0 else if (!arg || !SvOK(arg))
14 0 1 size_t size = SvIV(arg);
15 0 1 if (buffer->buf) {
16 0 0 if (size < buffer->bufsiz)
28 1 0 if (tab && tab->Open) {
1 0 if (tab && tab->Open) {
30 1 0 if (ret && PerlIO_push(aTHX_ ret, self, mode, PerlIOArg) == NULL) {
0 1 if (ret && PerlIO_push(aTHX_ ret, self, mode, PerlIOArg) == NULL) {