| line |
true |
false |
branch |
|
26
|
26 |
0 |
if(value && (!SvPOK(value) || !SvCUR(value))) { |
|
|
3 |
23 |
if(value && (!SvPOK(value) || !SvCUR(value))) { |
|
|
0 |
3 |
if(value && (!SvPOK(value) || !SvCUR(value))) { |
|
34
|
8 |
18 |
if (strcmp(name, "reader") == 0) { |
|
38
|
8 |
0 |
sv_catpv(sv_reader_code, SvPV_nolen(field->class->name)); |
|
40
|
1 |
7 |
if (value) { |
|
41
|
1 |
0 |
sv_catpv(sv_reader_code, SvPV_nolen(value)); |
|
44
|
7 |
0 |
sv_catpv(sv_reader_code, SvPV_nolen(field->name)); |
|
47
|
8 |
0 |
sv_catpv(sv_reader_code, SvPV_nolen(field->name)); |
|
51
|
8 |
0 |
Perl_eval_pv(aTHX_ SvPV_nolen(sv_reader_code), 1); |
|
54
|
5 |
13 |
else if (strcmp(name, "writer") == 0) { |
|
58
|
5 |
0 |
sv_catpv(sv_writer_code, SvPV_nolen(field->class->name)); |
|
60
|
1 |
4 |
if (value) { |
|
61
|
1 |
0 |
sv_catpv(sv_writer_code, SvPV_nolen(value)); |
|
65
|
4 |
0 |
sv_catpv(sv_writer_code, SvPV_nolen(field->name)); |
|
68
|
5 |
0 |
sv_catpv(sv_writer_code, SvPV_nolen(field->name)); |
|
72
|
5 |
0 |
Perl_eval_pv(aTHX_ SvPV_nolen(sv_writer_code), 1); |
|
75
|
13 |
0 |
else if (strcmp(name, "rw") == 0) { |
|
|
13 |
0 |
else if (strcmp(name, "rw") == 0) { |
|
|
13 |
0 |
else if (strcmp(name, "rw") == 0) { |
|
79
|
13 |
0 |
sv_catpv(sv_rw_code, SvPV_nolen(field->class->name)); |
|
81
|
1 |
12 |
if (value) { |
|
82
|
1 |
0 |
sv_catpv(sv_rw_code, SvPV_nolen(value)); |
|
85
|
12 |
0 |
sv_catpv(sv_rw_code, SvPV_nolen(field->name)); |
|
88
|
13 |
0 |
sv_catpv(sv_rw_code, SvPV_nolen(field->name)); |
|
91
|
13 |
0 |
sv_catpv(sv_rw_code, SvPV_nolen(field->name)); |
|
95
|
13 |
0 |
Perl_eval_pv(aTHX_ SvPV_nolen(sv_rw_code), 1); |