File Coverage

inc/TestML/Util.pm
Criterion Covered Total %
statement 15 19 78.9
branch n/a
condition n/a
subroutine 7 11 63.6
pod 0 7 0.0
total 22 37 59.4


line stmt bran cond sub pod time code
1 3     3   1757 use strict; use warnings;
  3     3   7  
  3         92  
  3         14  
  3         5  
  3         86  
2              
3 3     3   1278 use TestML::Runtime;
  3         11  
  3         184  
4              
5             package TestML::Util;
6              
7 3     3   20 use Exporter 'import';
  3         5  
  3         695  
8             our @EXPORT = qw( runtime list str num bool none native );
9              
10 4     4 0 13 sub runtime { $TestML::Runtime::Singleton }
11              
12 0     0 0 0 sub list { TestML::List->new(value => $_[0]) }
13 50     50 0 125155 sub str { TestML::Str->new(value => $_[0]) }
14 0     0 0 0 sub num { TestML::Num->new(value => $_[0]) }
15 0     0 0 0 sub bool { TestML::Bool->new(value => $_[0]) }
16 0     0 0 0 sub none { TestML::None->new(value => $_[0]) }
17 48     48 0 7759 sub native { TestML::Native->new(value => $_[0]) }
18              
19             1;