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(fieldmeta->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(fieldmeta->name)); |
47
|
8 |
0 |
sv_catpv(sv_reader_code, SvPV_nolen(fieldmeta->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(fieldmeta->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(fieldmeta->name)); |
68
|
5 |
0 |
sv_catpv(sv_writer_code, SvPV_nolen(fieldmeta->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(fieldmeta->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(fieldmeta->name)); |
88
|
13 |
0 |
sv_catpv(sv_rw_code, SvPV_nolen(fieldmeta->name)); |
91
|
13 |
0 |
sv_catpv(sv_rw_code, SvPV_nolen(fieldmeta->name)); |
95
|
13 |
0 |
Perl_eval_pv(aTHX_ SvPV_nolen(sv_rw_code), 1); |