line |
l |
!l |
condition |
72
|
0 |
4730 |
$args->{'code_type'} //= "validator"
|
77
|
2943 |
1787 |
$_ //= "bool_valid"
|
90
|
0 |
4730 |
$args->{'var_prefix'} //= "_sahv_"
|
91
|
0 |
4730 |
$args->{'sub_prefix'} //= "_sahs_"
|
93
|
0 |
4730 |
$args->{'data_term_is_lvalue'} //= 1
|
96
|
0 |
4730 |
$args->{'comment'} //= 1
|
98
|
0 |
4730 |
$args->{'coerce'} //= 1
|
251
|
4724 |
0 |
$args{'return_type'} // "bool_valid"
|
323
|
0 |
0 |
$ENV{'LINENUM'} // 1
|
354
|
13042 |
5609 |
$opts //= {}
|
355
|
6134 |
12517 |
$cd->{'clause'} // ""
|
356
|
3852 |
14799 |
$cd->{'cl_op'} // ""
|
359
|
6834 |
11817 |
($opts->{'err_level'} // $cd->{'clset'}{"$clause.err_level"}) // "error"
|
392
|
228 |
54 |
$cd->{'clause'} // ""
|
432
|
9268 |
4554 |
$opts //= {}
|
433
|
1797 |
12025 |
$opts->{'op'} // "and"
|
481
|
2094 |
20657 |
$which //= 0
|
636
|
27 |
27 |
$clset->{'ok.op'} // ""
|
664
|
1 |
4609 |
$$clset{"x.$cname.default_value_rules"} // []
|
665
|
0 |
4610 |
$clset->{'x.default_value_rules'} // []
|
812
|
1 |
4609 |
$$clset{"x.$cname.coerce_rules"} // []
|
813
|
0 |
4610 |
$clset->{'x.coerce_rules'} // []
|
1114
|
54 |
3903 |
$cd->{'clset'}{"$cd->{'clause'}.err_level"} // "error"
|
line |
l |
!l&&r |
!l&&!r |
condition |
92
|
0 |
4730 |
0 |
$args->{'data_term'} //= $self->var_sigil . $args->{'data_name'}
|
94
|
0 |
4730 |
0 |
$args->{'tmp_data_name'} //= "tmp_$args->{'data_name'}"
|
95
|
0 |
4730 |
0 |
$args->{'tmp_data_term'} //= $self->var_sigil . $args->{'tmp_data_name'}
|
97
|
0 |
4730 |
0 |
$args->{'err_term'} //= $self->var_sigil . "err_$args->{'data_name'}"
|
249
|
4724 |
0 |
0 |
delete $args{'var_term'} // $dt
|
250
|
0 |
0 |
4724 |
$args{'debug_log'} // $args{'debug'}
|
257
|
0 |
4724 |
0 |
$args{'cd'} // $self->compile(%args)
|
267
|
4651 |
0 |
40 |
grep({$_->{'phase'} eq 'runtime';} @{$$cd{'modules'};}) || $do_log
|
359
|
6780 |
54 |
11817 |
$opts->{'err_level'} // $cd->{'clset'}{"$clause.err_level"}
|
473
|
0 |
0 |
17105 |
$cd->{'args'}{'debug_log'} // $cd->{'args'}{'debug'}
|
529
|
7931 |
6965 |
6605 |
$rt =~ /\Abool/ or not $ec
|
621
|
1470 |
67 |
3310 |
$rt_is_hash || $rt_is_str && $cd->{'has_subschema'}
|
|
209 |
1537 |
3310 |
$cd->{'use_dpath'} //= $rt_is_hash || $rt_is_str && $cd->{'has_subschema'}
|
794
|
471 |
27 |
4558 |
$has_req or $has_fbd
|
1060
|
3881 |
1175 |
0 |
$cd->{'_hc'}->get_th("name", $cd->{'type'})->name // $cd->{'type'}
|