line |
true |
false |
branch |
62
|
72 |
0 |
*{$_;}{'CODE'} ? :
|
66
|
0 |
72 |
*{$_;}{'CODE'} ? :
|
76
|
0 |
162 |
ref $_[0] ? :
|
82
|
0 |
162 |
@_ == 1 ? :
|
|
0 |
162 |
$meta->{'HAS_BUILDARGS'} ? :
|
94
|
110 |
52 |
exists $args->{'definition_context'} ? :
|
96
|
0 |
162 |
unless ref $value eq "HASH"
|
104
|
110 |
52 |
if (exists $args->{'class'})
|
106
|
0 |
110 |
unless &blessed($args->{'class'}) and $args->{'class'}->isa("Mite::Package")
|
112
|
110 |
52 |
if ref $self->{'class'}
|
116
|
3 |
159 |
if (exists $args->{'_class_for_default'})
|
118
|
0 |
3 |
unless &blessed($args->{'_class_for_default'}) and $args->{'_class_for_default'}->isa("Mite::Package")
|
125
|
3 |
159 |
if ref $self->{'_class_for_default'}
|
129
|
0 |
162 |
unless exists $args->{'name'}
|
135
|
162 |
0 |
if (defined $args->{'name'})
|
137
|
0 |
162 |
unless ref \$args->{'name'} eq "SCALAR"
|
140
|
0 |
162 |
unless do {
|
148
|
6 |
156 |
if (exists $args->{'init_arg'})
|
149
|
0 |
6 |
unless do {
|
158
|
3 |
3 |
if (defined $args->{'init_arg'})
|
161
|
0 |
3 |
unless ref \$args->{'init_arg'} eq "SCALAR"
|
173
|
3 |
3 |
unless (do {
|
185
|
15 |
147 |
exists $args->{'required'} ? :
|
198
|
15 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
203
|
15 |
0 |
!ref($coerced_value) && (!defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1') ? :
|
222
|
10 |
152 |
exists $args->{'weak_ref'} ? :
|
224
|
0 |
2 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
238
|
118 |
44 |
exists $args->{'is'} ? :
|
239
|
1 |
161 |
unless do {
|
242
|
162 |
0 |
if defined $value and not ref $value
|
253
|
11 |
150 |
if (exists $args->{'reader'})
|
254
|
0 |
11 |
unless do {
|
267
|
9 |
2 |
if (defined $args->{'reader'})
|
272
|
0 |
9 |
unless ref \$args->{'reader'} eq "SCALAR"
|
290
|
9 |
2 |
if (defined $args->{'reader'})
|
295
|
0 |
9 |
unless ref \$args->{'reader'} eq "SCALAR"
|
302
|
11 |
0 |
unless do {
|
312
|
3 |
2 |
if defined $args->{'reader'} and not ref $args->{'reader'}
|
315
|
2 |
3 |
unless (do {
|
325
|
12 |
149 |
if (exists $args->{'writer'})
|
326
|
0 |
12 |
unless do {
|
339
|
4 |
8 |
if (defined $args->{'writer'})
|
344
|
0 |
4 |
unless ref \$args->{'writer'} eq "SCALAR"
|
362
|
4 |
8 |
if (defined $args->{'writer'})
|
367
|
0 |
4 |
unless ref \$args->{'writer'} eq "SCALAR"
|
374
|
12 |
0 |
unless do {
|
384
|
4 |
8 |
if defined $args->{'writer'} and not ref $args->{'writer'}
|
387
|
8 |
4 |
unless (do {
|
397
|
12 |
149 |
if (exists $args->{'accessor'})
|
398
|
0 |
12 |
unless do {
|
411
|
5 |
7 |
if (defined $args->{'accessor'})
|
417
|
0 |
5 |
unless ref \$args->{'accessor'} eq "SCALAR"
|
435
|
5 |
7 |
if (defined $args->{'accessor'})
|
441
|
0 |
5 |
unless ref \$args->{'accessor'} eq "SCALAR"
|
448
|
12 |
0 |
unless do {
|
458
|
4 |
7 |
if defined $args->{'accessor'} and not ref $args->{'accessor'}
|
461
|
7 |
4 |
unless (do {
|
471
|
11 |
150 |
if (exists $args->{'clearer'})
|
472
|
0 |
11 |
unless do {
|
485
|
3 |
8 |
if (defined $args->{'clearer'})
|
490
|
0 |
3 |
unless ref \$args->{'clearer'} eq "SCALAR"
|
508
|
3 |
8 |
if (defined $args->{'clearer'})
|
513
|
0 |
3 |
unless ref \$args->{'clearer'} eq "SCALAR"
|
520
|
11 |
0 |
unless do {
|
530
|
3 |
8 |
if defined $args->{'clearer'} and not ref $args->{'clearer'}
|
533
|
8 |
3 |
unless (do {
|
543
|
11 |
150 |
if (exists $args->{'predicate'})
|
544
|
0 |
11 |
unless do {
|
557
|
4 |
7 |
if (defined $args->{'predicate'})
|
563
|
0 |
4 |
unless ref \$args->{'predicate'} eq "SCALAR"
|
581
|
4 |
7 |
if (defined $args->{'predicate'})
|
587
|
0 |
4 |
unless ref \$args->{'predicate'} eq "SCALAR"
|
594
|
11 |
0 |
unless do {
|
604
|
4 |
7 |
if defined $args->{'predicate'} and not ref $args->{'predicate'}
|
606
|
7 |
4 |
unless (do {
|
620
|
13 |
148 |
if (exists $args->{'lvalue'})
|
621
|
0 |
13 |
unless do {
|
634
|
5 |
8 |
if (defined $args->{'lvalue'})
|
639
|
0 |
5 |
unless ref \$args->{'lvalue'} eq "SCALAR"
|
657
|
5 |
8 |
if (defined $args->{'lvalue'})
|
662
|
0 |
5 |
unless ref \$args->{'lvalue'} eq "SCALAR"
|
669
|
13 |
0 |
unless do {
|
679
|
5 |
8 |
if defined $args->{'lvalue'} and not ref $args->{'lvalue'}
|
682
|
8 |
5 |
unless (do {
|
692
|
9 |
152 |
if (exists $args->{'local_writer'})
|
693
|
0 |
9 |
unless do {
|
707
|
2 |
7 |
if (defined $args->{'local_writer'})
|
713
|
0 |
2 |
unless ref \$args->{'local_writer'} eq "SCALAR"
|
732
|
1 |
7 |
if (defined $args->{'local_writer'})
|
738
|
0 |
1 |
unless ref \$args->{'local_writer'} eq "SCALAR"
|
745
|
8 |
1 |
unless do {
|
758
|
1 |
7 |
if defined $args->{'local_writer'} and not ref $args->{'local_writer'}
|
760
|
7 |
1 |
unless (do {
|
774
|
17 |
144 |
if (exists $args->{'isa'})
|
775
|
0 |
17 |
unless do {
|
782
|
17 |
0 |
if (defined $args->{'isa'})
|
784
|
2 |
15 |
unless ref \$args->{'isa'} eq "SCALAR"
|
788
|
2 |
15 |
unless (do {
|
798
|
0 |
161 |
if (exists $args->{'does'})
|
799
|
0 |
0 |
unless do {
|
806
|
0 |
0 |
if (defined $args->{'does'})
|
808
|
0 |
0 |
unless ref \$args->{'does'} eq "SCALAR"
|
812
|
0 |
0 |
unless (do {
|
822
|
2 |
159 |
if (exists $args->{'enum'})
|
825
|
0 |
2 |
unless do {
|
831
|
0 |
6 |
unless do {
|
834
|
6 |
0 |
if (defined $i)
|
835
|
0 |
6 |
unless ref \$i eq "SCALAR"
|
854
|
0 |
161 |
if (exists $args->{'type'})
|
855
|
0 |
0 |
unless do {
|
866
|
0 |
0 |
unless (do {
|
877
|
14 |
147 |
exists $args->{'coerce'} ? :
|
879
|
0 |
6 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
892
|
85 |
76 |
if (exists $args->{'default'})
|
893
|
0 |
85 |
unless do {
|
901
|
80 |
0 |
if (defined $args->{'default'})
|
903
|
37 |
43 |
unless ref \$args->{'default'} eq "SCALAR"
|
916
|
3 |
1 |
unless ref $args->{'default'} eq "SCALAR"
|
927
|
1 |
2 |
if do {
|
929
|
2 |
1 |
unless (do {
|
937
|
2 |
0 |
if do {
|
950
|
12 |
149 |
exists $args->{'default_is_trusted'} ? :
|
963
|
12 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
968
|
12 |
0 |
!ref($coerced_value) && (!defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1') ? :
|
987
|
10 |
151 |
exists $args->{'default_does_trigger'} ? :
|
1000
|
10 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
1005
|
10 |
0 |
!ref($coerced_value) && (!defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1') ? :
|
1024
|
8 |
153 |
exists $args->{'skip_argc_check'} ? :
|
1037
|
8 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
1042
|
8 |
0 |
!ref($coerced_value) && (!defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1') ? :
|
1060
|
21 |
140 |
exists $args->{'lazy'} ? :
|
1062
|
0 |
13 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
1075
|
0 |
161 |
if (exists $args->{'coderef_default_variable'})
|
1081
|
0 |
0 |
if (defined $args->{'coderef_default_variable'})
|
1087
|
0 |
0 |
unless ref \$args->{'coderef_default_variable'} eq "SCALAR"
|
1093
|
0 |
0 |
unless do {
|
1107
|
6 |
155 |
if (exists $args->{'trigger'})
|
1108
|
0 |
6 |
unless do {
|
1121
|
6 |
0 |
if (defined $args->{'trigger'})
|
1126
|
0 |
6 |
unless ref \$args->{'trigger'} eq "SCALAR"
|
1144
|
6 |
0 |
if (defined $args->{'trigger'})
|
1149
|
0 |
6 |
unless ref \$args->{'trigger'} eq "SCALAR"
|
1156
|
6 |
0 |
unless do {
|
1166
|
6 |
0 |
if defined $args->{'trigger'} and not ref $args->{'trigger'}
|
1168
|
0 |
6 |
unless (do {
|
1182
|
8 |
153 |
if (exists $args->{'builder'})
|
1183
|
0 |
8 |
unless do {
|
1196
|
8 |
0 |
if (defined $args->{'builder'})
|
1201
|
7 |
1 |
unless ref \$args->{'builder'} eq "SCALAR"
|
1219
|
8 |
0 |
if (defined $args->{'builder'})
|
1224
|
7 |
1 |
unless ref \$args->{'builder'} eq "SCALAR"
|
1231
|
8 |
0 |
unless do {
|
1241
|
1 |
7 |
if defined $args->{'builder'} and not ref $args->{'builder'}
|
1243
|
7 |
1 |
unless (do {
|
1257
|
7 |
154 |
if (exists $args->{'clone'})
|
1258
|
0 |
7 |
unless do {
|
1271
|
7 |
0 |
if (defined $args->{'clone'})
|
1274
|
1 |
6 |
unless ref \$args->{'clone'} eq "SCALAR"
|
1291
|
7 |
0 |
if (defined $args->{'clone'})
|
1294
|
1 |
6 |
unless ref \$args->{'clone'} eq "SCALAR"
|
1300
|
7 |
0 |
unless do {
|
1310
|
5 |
1 |
if defined $args->{'clone'} and not ref $args->{'clone'}
|
1317
|
0 |
1 |
unless (do {
|
1327
|
4 |
157 |
if (exists $args->{'clone_on_read'})
|
1341
|
4 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
1345
|
0 |
4 |
unless not ref $coerced_value and !defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1'
|
1359
|
4 |
157 |
if (exists $args->{'clone_on_write'})
|
1373
|
4 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
1377
|
0 |
4 |
unless not ref $coerced_value and !defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1'
|
1391
|
1 |
160 |
if (exists $args->{'documentation'})
|
1397
|
8 |
153 |
if (exists $args->{'handles'})
|
1409
|
4 |
4 |
if (ref $to_coerce eq "HASH")
|
1412
|
0 |
9 |
unless do {
|
1422
|
9 |
0 |
if (defined $v)
|
1423
|
2 |
7 |
unless ref \$v eq "SCALAR"
|
1437
|
0 |
9 |
unless do {
|
1449
|
0 |
9 |
unless do {
|
1459
|
9 |
0 |
if (defined $k)
|
1460
|
0 |
9 |
unless ref \$k eq "SCALAR"
|
1486
|
4 |
0 |
if (defined $k)
|
1487
|
0 |
4 |
unless ref \$k eq "SCALAR"
|
1501
|
4 |
5 |
unless do {
|
1513
|
4 |
4 |
unless (do {
|
1516
|
2 |
2 |
if defined $to_coerce and not ref $to_coerce
|
1525
|
2 |
0 |
ref $to_coerce eq 'ARRAY' ? :
|
|
6 |
2 |
do {
|
1532
|
0 |
8 |
unless do {
|
1539
|
6 |
2 |
if (ref $coerced_value eq "HASH")
|
1542
|
0 |
11 |
unless do {
|
1551
|
11 |
0 |
if (defined $v)
|
1552
|
2 |
9 |
unless ref \$v eq "SCALAR"
|
1564
|
0 |
11 |
unless do {
|
1576
|
0 |
11 |
unless do {
|
1585
|
11 |
0 |
if (defined $k)
|
1586
|
0 |
11 |
unless ref \$k eq "SCALAR"
|
1609
|
4 |
0 |
if (defined $k)
|
1610
|
0 |
4 |
unless ref \$k eq "SCALAR"
|
1621
|
4 |
7 |
unless do {
|
1630
|
2 |
6 |
unless (do {
|
1633
|
2 |
0 |
if defined $coerced_value and not ref $coerced_value
|
1647
|
2 |
159 |
if (exists $args->{'handles_via'})
|
1655
|
0 |
2 |
if (ref $to_coerce eq "ARRAY")
|
1658
|
0 |
0 |
unless do {
|
1661
|
0 |
0 |
if (defined $i)
|
1662
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
1675
|
2 |
0 |
if (defined $to_coerce)
|
1676
|
0 |
2 |
unless ref \$to_coerce eq "SCALAR"
|
1682
|
2 |
0 |
do {
|
|
0 |
2 |
do {
|
1685
|
0 |
2 |
unless do {
|
1688
|
2 |
0 |
if (ref $coerced_value eq "ARRAY")
|
1691
|
0 |
2 |
unless do {
|
1694
|
2 |
0 |
if (defined $i)
|
1695
|
0 |
2 |
unless ref \$i eq "SCALAR"
|
1714
|
12 |
149 |
exists $args->{'alias'} ? :
|
1723
|
159 |
2 |
if (ref $to_coerce eq "ARRAY")
|
1726
|
0 |
2 |
unless do {
|
1735
|
2 |
0 |
if (defined $i)
|
1736
|
0 |
2 |
unless ref \$i eq "SCALAR"
|
1759
|
0 |
0 |
if (defined $i)
|
1760
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
1771
|
0 |
2 |
unless do {
|
1784
|
1 |
1 |
if (defined $to_coerce)
|
1785
|
0 |
1 |
unless ref \$to_coerce eq "SCALAR"
|
1792
|
1 |
0 |
!defined($to_coerce) ? :
|
|
1 |
1 |
do {
|
|
159 |
2 |
do {
|
1795
|
0 |
161 |
unless do {
|
1798
|
161 |
0 |
if (ref $coerced_value eq "ARRAY")
|
1801
|
0 |
3 |
unless do {
|
1810
|
3 |
0 |
if (defined $i)
|
1811
|
0 |
3 |
unless ref \$i eq "SCALAR"
|
1830
|
0 |
0 |
if (defined $i)
|
1831
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
1838
|
0 |
3 |
unless do {
|
1853
|
0 |
161 |
unless $meta->{'BUILD'}
|
|
161 |
0 |
if not $no_build and @{[] unless $meta->{'BUILD'};}
|
1860
|
0 |
157 |
if @unknown
|
1870
|
0 |
161 |
unless $meta->{'BUILD'}
|
1878
|
37 |
0 |
defined ${^GLOBAL_PHASE} ? :
|
1882
|
0 |
37 |
unless $meta->{'DEMOLISH'}
|
1889
|
0 |
0 |
if $e
|
1902
|
0 |
0 |
unless &blessed($_[1]) and $_[1]->isa("Mite::Package")
|
1908
|
0 |
0 |
if ref $_[0]{'_class_for_default'}
|
1911
|
0 |
28 |
@_ > 1 ? :
|
1916
|
2 |
26 |
exists $_[0]{'_class_for_default'} ? :
|
1918
|
0 |
26 |
unless &blessed($default_value) and $default_value->isa("Mite::Package")
|
1953
|
0 |
4 |
unless do {
|
1966
|
4 |
0 |
if (defined $_[1])
|
1967
|
0 |
4 |
unless ref \$_[1] eq "SCALAR"
|
1982
|
0 |
0 |
if (defined $_[1])
|
1983
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
1990
|
0 |
4 |
unless do {
|
1995
|
0 |
0 |
unless do {
|
1998
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
2010
|
4 |
295 |
@_ > 1 ? :
|
2013
|
146 |
149 |
exists $_[0]{'accessor'} ? :
|
2015
|
0 |
149 |
unless do {
|
2029
|
56 |
93 |
if (defined $default_value)
|
2030
|
0 |
56 |
unless ref \$default_value eq "SCALAR"
|
2054
|
56 |
93 |
if (defined $default_value)
|
2055
|
0 |
56 |
unless ref \$default_value eq "SCALAR"
|
2067
|
149 |
0 |
unless do {
|
2075
|
93 |
0 |
unless do {
|
2078
|
0 |
93 |
if defined $default_value and not ref $default_value
|
2108
|
0 |
0 |
if (ref $to_coerce eq "ARRAY")
|
2111
|
0 |
0 |
unless do {
|
2120
|
0 |
0 |
if (defined $i)
|
2121
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2140
|
0 |
0 |
if (defined $i)
|
2141
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2148
|
0 |
0 |
unless do {
|
2160
|
0 |
0 |
if (defined $to_coerce)
|
2161
|
0 |
0 |
unless ref \$to_coerce eq "SCALAR"
|
2167
|
0 |
0 |
!defined($to_coerce) ? :
|
|
0 |
0 |
do {
|
|
0 |
0 |
do {
|
2170
|
0 |
0 |
unless do {
|
2173
|
0 |
0 |
if (ref $value eq "ARRAY")
|
2176
|
0 |
0 |
unless do {
|
2185
|
0 |
0 |
if (defined $i)
|
2186
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2201
|
0 |
0 |
if (defined $i)
|
2202
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2208
|
0 |
0 |
unless do {
|
2221
|
0 |
500 |
@_ > 1 ? :
|
2227
|
0 |
120 |
unless @_ == 1
|
2231
|
0 |
120 |
exists $_[0]{'alias_is_for'} ? :
|
2253
|
0 |
17 |
unless do {
|
2266
|
17 |
0 |
if (defined $_[1])
|
2267
|
0 |
17 |
unless ref \$_[1] eq "SCALAR"
|
2282
|
8 |
0 |
if (defined $_[1])
|
2283
|
0 |
8 |
unless ref \$_[1] eq "SCALAR"
|
2290
|
8 |
9 |
unless do {
|
2295
|
0 |
8 |
unless do {
|
2298
|
8 |
0 |
if defined $_[1] and not ref $_[1]
|
2310
|
17 |
336 |
@_ > 1 ? :
|
2318
|
0 |
0 |
unless &blessed($_[1]) and $_[1]->isa("Mite::Package")
|
2323
|
0 |
0 |
if ref $_[0]{'class'}
|
2326
|
0 |
171 |
@_ > 1 ? :
|
2334
|
0 |
3 |
unless do {
|
2347
|
3 |
0 |
if (defined $_[1])
|
2348
|
0 |
3 |
unless ref \$_[1] eq "SCALAR"
|
2363
|
0 |
0 |
if (defined $_[1])
|
2364
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
2371
|
0 |
3 |
unless do {
|
2376
|
0 |
0 |
unless do {
|
2379
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
2391
|
3 |
284 |
@_ > 1 ? :
|
2394
|
134 |
150 |
exists $_[0]{'clearer'} ? :
|
2396
|
0 |
150 |
unless do {
|
2410
|
0 |
150 |
if (defined $default_value)
|
2411
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
2435
|
0 |
150 |
if (defined $default_value)
|
2436
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
2448
|
150 |
0 |
unless do {
|
2456
|
150 |
0 |
unless do {
|
2459
|
0 |
150 |
if defined $default_value and not ref $default_value
|
2497
|
0 |
226 |
unless @_ == 1
|
2501
|
110 |
116 |
exists $_[0]{'clone_on_read'} ? :
|
2514
|
116 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
2518
|
0 |
3 |
unless not ref $default_value and !defined($default_value) || $default_value eq '' || $default_value eq '0' || $default_value eq '1'
|
2535
|
0 |
293 |
unless @_ == 1
|
2539
|
177 |
116 |
exists $_[0]{'clone_on_write'} ? :
|
2552
|
116 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
2556
|
0 |
3 |
unless not ref $default_value and !defined($default_value) || $default_value eq '' || $default_value eq '0' || $default_value eq '1'
|
2577
|
0 |
0 |
unless do {
|
2580
|
0 |
0 |
if (defined $_[1])
|
2581
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
2596
|
0 |
32 |
@_ > 1 ? :
|
2601
|
4 |
28 |
exists $_[0]{'coderef_default_variable'} ? :
|
2607
|
0 |
28 |
unless do {
|
2610
|
28 |
0 |
if (defined $default_value)
|
2611
|
0 |
28 |
unless ref \$default_value eq "SCALAR"
|
2638
|
0 |
0 |
unless not ref $_[1] and !defined($_[1]) || $_[1] eq '' || $_[1] eq '0' || $_[1] eq '1'
|
2649
|
0 |
77 |
@_ > 1 ? :
|
2657
|
0 |
245 |
unless &blessed($_[1]) and $_[1]->isa("Mite::Package")
|
2663
|
245 |
461 |
@_ > 1 ? :
|
2668
|
0 |
245 |
unless defined wantarray
|
2680
|
0 |
245 |
$self->$has ? :
|
2681
|
245 |
0 |
@_ == 2 ? :
|
2704
|
0 |
3 |
unless do {
|
2711
|
3 |
0 |
if (defined $_[1])
|
2712
|
0 |
3 |
unless ref \$_[1] eq "SCALAR"
|
2722
|
0 |
0 |
if ref $_[1] eq "HASH"
|
2724
|
0 |
0 |
unless (not defined $_[1] or do {
|
2727
|
0 |
0 |
if ref $_[1] eq "ARRAY"
|
2736
|
3 |
354 |
@_ > 1 ? :
|
2755
|
0 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
2759
|
0 |
0 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
2770
|
0 |
81 |
@_ > 1 ? :
|
2789
|
0 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
2793
|
0 |
0 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
2804
|
0 |
81 |
@_ > 1 ? :
|
2812
|
0 |
0 |
unless ref $_[1] eq "HASH"
|
2818
|
0 |
249 |
@_ > 1 ? :
|
2878
|
0 |
0 |
unless do {
|
2881
|
0 |
0 |
if (ref $_[1] eq "ARRAY")
|
2887
|
0 |
0 |
unless do {
|
2890
|
0 |
0 |
if (defined $i)
|
2891
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2908
|
0 |
4 |
@_ > 1 ? :
|
2940
|
0 |
0 |
if (ref $to_coerce eq "HASH")
|
2943
|
0 |
0 |
unless do {
|
2952
|
0 |
0 |
if (defined $v)
|
2953
|
0 |
0 |
unless ref \$v eq "SCALAR"
|
2965
|
0 |
0 |
unless do {
|
2977
|
0 |
0 |
unless do {
|
2986
|
0 |
0 |
if (defined $k)
|
2987
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
3010
|
0 |
0 |
if (defined $k)
|
3011
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
3023
|
0 |
0 |
unless do {
|
3035
|
0 |
0 |
unless (do {
|
3038
|
0 |
0 |
if defined $to_coerce and not ref $to_coerce
|
3045
|
0 |
0 |
ref $to_coerce eq 'ARRAY' ? :
|
|
0 |
0 |
do {
|
3052
|
0 |
0 |
unless do {
|
3059
|
0 |
0 |
if (ref $value eq "HASH")
|
3062
|
0 |
0 |
unless do {
|
3071
|
0 |
0 |
if (defined $v)
|
3072
|
0 |
0 |
unless ref \$v eq "SCALAR"
|
3080
|
0 |
0 |
unless do {
|
3092
|
0 |
0 |
unless do {
|
3101
|
0 |
0 |
if (defined $k)
|
3102
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
3121
|
0 |
0 |
if (defined $k)
|
3122
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
3129
|
0 |
0 |
unless do {
|
3137
|
0 |
0 |
unless (do {
|
3140
|
0 |
0 |
if defined $value and not ref $value
|
3151
|
0 |
23 |
@_ > 1 ? :
|
3180
|
0 |
0 |
if (ref $to_coerce eq "ARRAY")
|
3183
|
0 |
0 |
unless do {
|
3186
|
0 |
0 |
if (defined $i)
|
3187
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
3200
|
0 |
0 |
if (defined $to_coerce)
|
3201
|
0 |
0 |
unless ref \$to_coerce eq "SCALAR"
|
3205
|
0 |
0 |
do {
|
|
0 |
0 |
do {
|
3207
|
0 |
0 |
unless do {
|
3210
|
0 |
0 |
if (ref $value eq "ARRAY")
|
3213
|
0 |
0 |
unless do {
|
3216
|
0 |
0 |
if (defined $i)
|
3217
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
3230
|
0 |
3 |
@_ > 1 ? :
|
3238
|
0 |
0 |
unless do {
|
3244
|
0 |
0 |
unless do {
|
3247
|
0 |
0 |
if (defined $_[1])
|
3248
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3263
|
0 |
535 |
@_ > 1 ? :
|
3266
|
427 |
108 |
exists $_[0]{'init_arg'} ? :
|
3270
|
0 |
108 |
unless do {
|
3276
|
0 |
108 |
unless do {
|
3279
|
108 |
0 |
if (defined $default_value)
|
3280
|
0 |
108 |
unless ref \$default_value eq "SCALAR"
|
3311
|
0 |
4 |
unless do {
|
3314
|
4 |
0 |
if defined $_[1] and not ref $_[1]
|
3323
|
4 |
717 |
@_ > 1 ? :
|
3347
|
0 |
4 |
unless not ref $_[1] and !defined($_[1]) || $_[1] eq '' || $_[1] eq '0' || $_[1] eq '1'
|
3358
|
4 |
329 |
@_ > 1 ? :
|
3366
|
0 |
1 |
unless do {
|
3379
|
1 |
0 |
if (defined $_[1])
|
3380
|
0 |
1 |
unless ref \$_[1] eq "SCALAR"
|
3395
|
0 |
0 |
if (defined $_[1])
|
3396
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3403
|
0 |
1 |
unless do {
|
3408
|
0 |
0 |
unless do {
|
3411
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
3423
|
1 |
282 |
@_ > 1 ? :
|
3426
|
130 |
152 |
exists $_[0]{'local_writer'} ? :
|
3428
|
0 |
152 |
unless do {
|
3442
|
0 |
152 |
if (defined $default_value)
|
3443
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3467
|
0 |
152 |
if (defined $default_value)
|
3468
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3480
|
152 |
0 |
unless do {
|
3488
|
152 |
0 |
unless do {
|
3491
|
0 |
152 |
if defined $default_value and not ref $default_value
|
3515
|
0 |
5 |
unless do {
|
3528
|
5 |
0 |
if (defined $_[1])
|
3529
|
0 |
5 |
unless ref \$_[1] eq "SCALAR"
|
3544
|
0 |
0 |
if (defined $_[1])
|
3545
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3552
|
0 |
5 |
unless do {
|
3557
|
0 |
0 |
unless do {
|
3560
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
3572
|
5 |
444 |
@_ > 1 ? :
|
3575
|
296 |
148 |
exists $_[0]{'lvalue'} ? :
|
3577
|
0 |
148 |
unless do {
|
3591
|
0 |
148 |
if (defined $default_value)
|
3592
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3616
|
0 |
148 |
if (defined $default_value)
|
3617
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3629
|
148 |
0 |
unless do {
|
3637
|
148 |
0 |
unless do {
|
3640
|
0 |
148 |
if defined $default_value and not ref $default_value
|
3666
|
0 |
0 |
unless do {
|
3669
|
0 |
0 |
if (defined $_[1])
|
3670
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3685
|
0 |
1597 |
@_ > 1 ? :
|
3693
|
0 |
4 |
unless do {
|
3706
|
4 |
0 |
if (defined $_[1])
|
3707
|
0 |
4 |
unless ref \$_[1] eq "SCALAR"
|
3722
|
0 |
0 |
if (defined $_[1])
|
3723
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3730
|
0 |
4 |
unless do {
|
3735
|
0 |
0 |
unless do {
|
3738
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
3750
|
4 |
285 |
@_ > 1 ? :
|
3753
|
135 |
150 |
exists $_[0]{'predicate'} ? :
|
3755
|
0 |
150 |
unless do {
|
3769
|
0 |
150 |
if (defined $default_value)
|
3770
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3794
|
0 |
150 |
if (defined $default_value)
|
3795
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3807
|
150 |
0 |
unless do {
|
3815
|
150 |
0 |
unless do {
|
3818
|
0 |
150 |
if defined $default_value and not ref $default_value
|
3842
|
0 |
3 |
unless do {
|
3855
|
3 |
0 |
if (defined $_[1])
|
3856
|
0 |
3 |
unless ref \$_[1] eq "SCALAR"
|
3871
|
0 |
0 |
if (defined $_[1])
|
3872
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3879
|
0 |
3 |
unless do {
|
3884
|
0 |
0 |
unless do {
|
3887
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
3899
|
3 |
288 |
@_ > 1 ? :
|
3902
|
138 |
150 |
exists $_[0]{'reader'} ? :
|
3904
|
0 |
150 |
unless do {
|
3918
|
53 |
97 |
if (defined $default_value)
|
3919
|
0 |
53 |
unless ref \$default_value eq "SCALAR"
|
3943
|
53 |
97 |
if (defined $default_value)
|
3944
|
0 |
53 |
unless ref \$default_value eq "SCALAR"
|
3956
|
150 |
0 |
unless do {
|
3964
|
97 |
0 |
unless do {
|
3967
|
0 |
97 |
if defined $default_value and not ref $default_value
|
4002
|
0 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
4006
|
0 |
0 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
4017
|
0 |
227 |
@_ > 1 ? :
|
4036
|
0 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
4040
|
0 |
0 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
4051
|
0 |
68 |
@_ > 1 ? :
|
4073
|
0 |
6 |
unless do {
|
4086
|
6 |
0 |
if (defined $_[1])
|
4087
|
0 |
6 |
unless ref \$_[1] eq "SCALAR"
|
4102
|
0 |
0 |
if (defined $_[1])
|
4103
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
4110
|
0 |
6 |
unless do {
|
4115
|
0 |
0 |
unless do {
|
4118
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
4130
|
6 |
698 |
@_ > 1 ? :
|
4136
|
0 |
639 |
unless @_ == 1
|
4139
|
518 |
121 |
exists $_[0]{'type'} ? :
|
4141
|
0 |
121 |
unless do {
|
4146
|
102 |
19 |
unless do {
|
4170
|
0 |
0 |
unless not ref $_[1] and !defined($_[1]) || $_[1] eq '' || $_[1] eq '0' || $_[1] eq '1'
|
4181
|
0 |
303 |
@_ > 1 ? :
|
4189
|
0 |
4 |
unless do {
|
4202
|
4 |
0 |
if (defined $_[1])
|
4203
|
0 |
4 |
unless ref \$_[1] eq "SCALAR"
|
4218
|
0 |
0 |
if (defined $_[1])
|
4219
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
4226
|
0 |
4 |
unless do {
|
4231
|
0 |
0 |
unless do {
|
4234
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
4246
|
4 |
286 |
@_ > 1 ? :
|
4249
|
137 |
149 |
exists $_[0]{'writer'} ? :
|
4251
|
0 |
149 |
unless do {
|
4265
|
3 |
146 |
if (defined $default_value)
|
4266
|
0 |
3 |
unless ref \$default_value eq "SCALAR"
|
4290
|
3 |
146 |
if (defined $default_value)
|
4291
|
0 |
3 |
unless ref \$default_value eq "SCALAR"
|
4303
|
149 |
0 |
unless do {
|
4311
|
146 |
0 |
unless do {
|
4314
|
0 |
146 |
if defined $default_value and not ref $default_value
|
4337
|
0 |
0 |
if exists $DOES{$role}
|
4338
|
0 |
0 |
if $role eq "Mite::Attribute"
|