line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
|
2
|
|
|
|
|
|
|
use v5.14; |
3
|
1
|
|
|
1
|
|
628
|
use warnings; |
|
1
|
|
|
|
|
4
|
|
4
|
1
|
|
|
1
|
|
6
|
use Test::Roo::Role; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
27
|
|
5
|
1
|
|
|
1
|
|
4
|
use Test::Moose; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
8
|
|
6
|
1
|
|
|
1
|
|
1113
|
use Attean; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
9
|
|
7
|
1
|
|
|
1
|
|
552
|
use Attean::RDF; |
|
1
|
|
|
|
|
3
|
|
|
1
|
|
|
|
|
9
|
|
8
|
1
|
|
|
1
|
|
6
|
|
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
9
|
|
9
|
|
|
|
|
|
|
requires 'create_store'; # create_store( quads => \@quads ) |
10
|
|
|
|
|
|
|
with 'Test::Attean::StoreCleanup'; |
11
|
|
|
|
|
|
|
|
12
|
|
|
|
|
|
|
test 'etagcacheablequadstore' => sub { |
13
|
|
|
|
|
|
|
my $self = shift; |
14
|
|
|
|
|
|
|
my $time = time(); |
15
|
|
|
|
|
|
|
my $store = $self->create_store(quads => []); |
16
|
|
|
|
|
|
|
my $etag = $store->etag_value_for_quads(); |
17
|
|
|
|
|
|
|
ok(length($etag)); |
18
|
|
|
|
|
|
|
$self->cleanup_store($store); |
19
|
|
|
|
|
|
|
}; |
20
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
1; |