Branch Coverage

pdlperlfunc.c
Criterion Covered Total %
branch 15 28 53.5


line true false branch
31 40 0 if (delete_magic != NULL) {
96 10 84 if ( *dat != NULL) {
119 0 77754 PUSHMARK(SP);
122 0 77754 XPUSHs(dat->p_sv);
123 0 77754 XPUSHs(dat->x_sv);
124 0 77754 XPUSHs(dat->t_sv);
129 0 77754 if (count!=1)
133 77754 0 FREETMPS;
146 0 15224 PUSHMARK(SP);
147 0 15224 XPUSHs(dat->p_sv);
148 0 15224 XPUSHs(dat->d_sv);
149 0 15224 XPUSHs(dat->t_sv);
153 0 15224 if (count!=1)
156 15224 0 FREETMPS;