File Coverage

blib/lib/OpenMP.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 2 2 100.0
total 23 23 100.0


line stmt bran cond sub pod time code
1             package OpenMP;
2              
3 1     1   9107 use strict;
  1         2  
  1         42  
4 1     1   5 use warnings;
  1         1  
  1         64  
5              
6 1     1   980 use OpenMP::Simple;
  1         138266  
  1         35  
7 1     1   691 use OpenMP::Environment;
  1         7224  
  1         92  
8              
9             my $VERSION = q{1.0.2};
10              
11             sub new {
12 1     1 1 10592207 my ($pkg) = shift;
13 1         41 return bless {
14             env => OpenMP::Environment->new,
15             }, $pkg;
16             }
17              
18             sub env {
19 8     8 1 93475 return shift->{env};
20             }
21              
22             777
23              
24             __END__