File Coverage

blib/lib/DTL/Fast/Expression/Operator/Unary/Logical.pm
Criterion Covered Total %
statement 17 17 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 1 0.0
total 23 24 95.8


line stmt bran cond sub pod time code
1             package DTL::Fast::Expression::Operator::Unary::Logical;
2 5     5   2132 use strict;
  5         10  
  5         181  
3 5     5   23 use utf8;
  5         10  
  5         22  
4 5     5   99 use warnings FATAL => 'all';
  5         10  
  5         133  
5 5     5   22 use parent 'DTL::Fast::Expression::Operator::Unary';
  5         10  
  5         20  
6              
7 5     5   273 use DTL::Fast::Utils qw(as_bool);
  5         13  
  5         488  
8              
9             sub render
10             {
11 922     922 0 1725 my ( $self, $context ) = @_;
12              
13             return $self->dispatch(
14 922         2673 as_bool($self->{a}->render($context, 1))
15             , $context
16             );
17             }
18              
19             1;