| line |
true |
false |
branch |
|
32
|
0 |
0 |
if (NOT_PARSING) { |
|
|
0 |
0 |
if (NOT_PARSING) { |
|
|
0 |
0 |
if (NOT_PARSING) { |
|
36
|
0 |
0 |
return SvPVX (PL_linestr); |
|
43
|
2 |
1 |
if (NOT_PARSING) { |
|
|
0 |
2 |
if (NOT_PARSING) { |
|
|
0 |
2 |
if (NOT_PARSING) { |
|
47
|
0 |
2 |
linestr = SvPVX (PL_linestr); |
|
48
|
0 |
2 |
return PL_bufptr - linestr; |
|
55
|
0 |
0 |
if (NOT_PARSING) { |
|
|
0 |
0 |
if (NOT_PARSING) { |
|
|
0 |
0 |
if (NOT_PARSING) { |
|
61
|
0 |
0 |
if (SvLEN (PL_linestr) < new_len+1) { |
|
|
0 |
0 |
if (SvLEN (PL_linestr) < new_len+1) { |
|
63
|
0 |
0 |
" bailing out before we crash harder", SvPVX (PL_linestr)); |
|
66
|
0 |
0 |
Copy (new_value, SvPVX (PL_linestr), new_len + 1, char); |
|
68
|
0 |
0 |
SvCUR_set (PL_linestr, new_len); |
|
69
|
0 |
0 |
PL_bufend = SvPVX(PL_linestr) + new_len; |
|
|
0 |
0 |
PL_bufend = SvPVX(PL_linestr) + new_len; |
|
75
|
40 |
0 |
SvGROW (sv, 8192); |
|
|
1 |
39 |
SvGROW (sv, 8192); |
|
85
|
0 |
2 |
if (PL_op->op_private & OPpEVAL_HAS_HH) { |
|
97
|
2 |
0 |
if (SvPOK (sv)) { |
|
98
|
0 |
2 |
if (SvREADONLY (sv)) { |
|
102
|
2 |
0 |
if (!SvLEN (sv) || SvPVX (sv)[SvLEN (sv) - 1] != ';') { |
|
|
2 |
0 |
if (!SvLEN (sv) || SvPVX (sv)[SvLEN (sv) - 1] != ';') { |
|
103
|
2 |
0 |
if (!SvTEMP (sv)) { |
|
110
|
2 |
0 |
SvGROW (sv, 8192); |
|
|
2 |
0 |
SvGROW (sv, 8192); |
|
120
|
3 |
6 |
if (op->op_ppaddr == PL_ppaddr[OP_ENTEREVAL]) { |
|
140
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
144
|
0 |
0 |
return SvPVX (PL_lex_stuff); |
|
149
|
0 |
0 |
if (NOT_PARSING) { |
|
|
0 |
0 |
if (NOT_PARSING) { |
|
|
0 |
0 |
if (NOT_PARSING) { |
|
153
|
0 |
0 |
PL_lex_stuff = (SV *)NULL; |
|
160
|
0 |
0 |
while (s < PL_bufend && isSPACE (*s)) { |
|
|
0 |
0 |
while (s < PL_bufend && isSPACE (*s)) { |
|
|
0 |
0 |
while (s < PL_bufend && isSPACE (*s)) { |
|
164
|
0 |
0 |
tokenbuf_len = strlen (PL_tokenbuf); |
|
165
|
0 |
0 |
if (memEQ (s, PL_tokenbuf, tokenbuf_len)) { |
|
|
0 |
0 |
if (memEQ (s, PL_tokenbuf, tokenbuf_len)) { |
|
174
|
0 |
0 |
char *base_s = SvPVX (PL_linestr) + offset; |
|
206
|
5 |
1 |
if (NOT_PARSING) { |
|
|
0 |
5 |
if (NOT_PARSING) { |
|
|
0 |
5 |
if (NOT_PARSING) { |
|
209
|
0 |
5 |
RETVAL = newSVsv (PL_linestr); |
|
225
|
2 |
1 |
if (NOT_PARSING) { |
|
|
0 |
2 |
if (NOT_PARSING) { |
|
|
0 |
2 |
if (NOT_PARSING) { |
|
228
|
2 |
0 |
new_chars = SvPV(new_value, new_len); |
|
229
|
0 |
2 |
if (SvLEN (PL_linestr) < new_len+1) { |
|
|
0 |
2 |
if (SvLEN (PL_linestr) < new_len+1) { |
|
231
|
0 |
0 |
" bailing out before we crash harder", SvPVX (PL_linestr)); |
|
233
|
0 |
2 |
Copy (new_chars, SvPVX (PL_linestr), new_len + 1, char); |
|
234
|
0 |
2 |
SvCUR_set (PL_linestr, new_len); |
|
235
|
0 |
2 |
PL_bufend = SvPVX(PL_linestr) + new_len; |
|
|
0 |
2 |
PL_bufend = SvPVX(PL_linestr) + new_len; |
|
240
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
|
0 |
0 |
if (NOT_PARSING || !PL_lex_stuff) { |
|
243
|
0 |
0 |
RETVAL = newSVsv (PL_lex_stuff); |
|
260
|
0 |
0 |
base_s = SvPVX (PL_linestr) + offset; |
|
276
|
0 |
0 |
EXTEND (SP, 2); |
|
286
|
0 |
0 |
base_s = SvPVX (PL_linestr) + offset; |