File Coverage

blib/lib/Thrift/Parser/Type/void.pm
Criterion Covered Total %
statement 10 12 83.3
branch n/a
condition n/a
subroutine 4 6 66.6
pod 3 3 100.0
total 17 21 80.9


line stmt bran cond sub pod time code
1             package Thrift::Parser::Type::void;
2              
3             =head1 NAME
4              
5             Thrift::Parser::Type::void - void type
6              
7             =head1 DESCRIPTION
8              
9             This type class doesn't really hold a value, but is will represent a void type nonetheless.
10              
11             =cut
12              
13 6     6   35 use strict;
  6         14  
  6         233  
14 6     6   33 use warnings;
  6         13  
  6         199  
15 6     6   37 use base qw(Thrift::Parser::Type);
  6         11  
  6         997  
16              
17             sub read {
18 0     0 1 0 my ($self, $parser, $input, $meta) = @_;
19             # do nothing
20             }
21              
22 0     0 1 0 sub write {
23             # do nothing; it's a void for crying out loud
24             }
25              
26             sub value_plain {
27 1     1 1 541 return undef;
28             }
29              
30             =head1 COPYRIGHT
31              
32             Copyright (c) 2009 Eric Waters and XMission LLC (http://www.xmission.com/). All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
33              
34             The full text of the license can be found in the LICENSE file included with this module.
35              
36             =head1 AUTHOR
37              
38             Eric Waters
39              
40             =cut
41              
42             1;