| line |
true |
false |
branch |
|
142
|
0 |
27085 |
/* The ASSUME bits are from perl 5.19.6 perl.h */ |
|
7280
|
3 |
0 |
if (sv) /* already NULL in global destruction */ |
|
7318
|
0 |
5150 |
if(SvCUR(key) > UINT_MAX) |
|
7323
|
10 |
5140 |
if (!c) |
|
7325
|
5126 |
14 |
if (ix == 0) { /* is FETCH */ |
|
7326
|
518 |
4608 |
if (c->type == T_INT) { |
|
7346
|
1318 |
3290 |
if (c->len) { |
|
7357
|
893 |
425 |
if (c->len & 0x1) |
|
7422
|
19 |
0 |
const I32 gimme = GIMME_V; |
|
7423
|
19 |
0 |
if (gimme != G_VOID) { |
|
7424
|
19 |
0 |
EXTEND(sp, gimme == G_SCALAR ? 1 : size); |
|
|
0 |
19 |
EXTEND(sp, gimme == G_SCALAR ? 1 : size); |
|
|
19 |
0 |
EXTEND(sp, gimme == G_SCALAR ? 1 : size); |
|
|
19 |
0 |
EXTEND(sp, gimme == G_SCALAR ? 1 : size); |
|
|
0 |
19 |
EXTEND(sp, gimme == G_SCALAR ? 1 : size); |
|
|
0 |
0 |
EXTEND(sp, gimme == G_SCALAR ? 1 : size); |
|
7425
|
0 |
19 |
if (gimme == G_SCALAR) |
|
7429
|
23313 |
19 |
while (s < end) { |
|
7460
|
5150 |
0 |
PPCODE: |
|
|
5150 |
0 |
PPCODE: |
|
7464
|
5149 |
1 |
/* bounds check to avoid running off the end of stringpool */ |
|
|
5149 |
0 |
/* bounds check to avoid running off the end of stringpool */ |
|
7465
|
2452 |
2 |
if (*self < sizeof (stringpool_contents)) { |
|
7467
|
5140 |
9 |
size_t len = strlen(key); |
|
7471
|
5140 |
0 |
else |
|
|
5140 |
0 |
else |