File Coverage

blib/lib/CQL/NotNode.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 14 15 93.3


line stmt bran cond sub pod time code
1             package CQL::NotNode;
2              
3 8     8   2617 use strict;
  8         14  
  8         266  
4 8     8   42 use warnings;
  8         15  
  8         343  
5 8     8   40 use base qw( CQL::BooleanNode );
  8         14  
  8         1011  
6              
7             =head1 NAME
8              
9             CQL::NotNode - represents a NOT node in a CQL parse tree
10              
11             =head1 SYNOPSIS
12              
13             use CQL::NotNode;
14             my $node = CQL::NotNode->new( left => $left, right => $right );
15              
16             =head1 DESCRIPTION
17              
18             CQL::NotNode inherits from CQL::BooleanNode, where you'll find most of
19             the functionality.
20              
21             =cut
22              
23 4     4 0 31 sub op { return 'not'; }
24              
25             1;