File Coverage

lib/SQL/Admin/Catalog/Table/PrimaryKey.pm
Criterion Covered Total %
statement 10 10 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 14 14 100.0


line stmt bran cond sub pod time code
1              
2             package SQL::Admin::Catalog::Table::PrimaryKey;
3 2     2   1239 use base qw( SQL::Admin::Catalog::Table::Constraint );
  2         5  
  2         971  
4              
5 2     2   16 use strict;
  2         5  
  2         111  
6 2     2   11 use warnings;
  2         4  
  2         258  
7              
8             our $VERSION = v0.5.0;
9              
10             ######################################################################
11             ######################################################################
12             sub _constraint_type { # ;
13 6     6   18 'primary_key';
14             }
15              
16              
17             ######################################################################
18             ######################################################################
19              
20             package SQL::Admin::Catalog::Table::PrimaryKey;
21              
22             1;