Branch Coverage

easyxs/easyxs_perlcall.h
Criterion Covered Total %
branch 29 64 45.3


line true false branch
11 6 0 if (args) {
12 16 6 while (args[argscount] != NULL) argscount++;
18 0 6 PUSHMARK(SP);
20 6 0 if (object || argscount) {
5 1 if (object || argscount) {
21 0 5 EXTEND(SP, (object ? 1 : 0) + argscount);
0 5 EXTEND(SP, (object ? 1 : 0) + argscount);
0 0 EXTEND(SP, (object ? 1 : 0) + argscount);
23 0 5 if (object) PUSHs( sv_mortalcopy(object) );
26 16 5 while (a < argscount) mPUSHs( args[a++] );
78 0 5 Newx(ret, 1 + count, SV*);
81 7 5 while (count-- > 0) {
86 5 0 FREETMPS;
161 6 0 _handle_trapped_error(count);
6 0 _handle_trapped_error(count);
0 6 _handle_trapped_error(count);
0 6 _handle_trapped_error(count);
0 0 _handle_trapped_error(count);
0 0 _handle_trapped_error(count);
6 0 _handle_trapped_error(count);
6 0 _handle_trapped_error(count);
5 1 _handle_trapped_error(count);
0 5 _handle_trapped_error(count);
0 0 _handle_trapped_error(count);
0 0 _handle_trapped_error(count);
0 0 _handle_trapped_error(count);
0 0 _handle_trapped_error(count);
0 0 _handle_trapped_error(count);
0 0 _handle_trapped_error(count);
1 5 _handle_trapped_error(count);
0 1 _handle_trapped_error(count);
1 0 _handle_trapped_error(count);