[libatteanx-query-cache-perl] 02/09: make todo and run all the rest

[Jonas Smedegaard]

This is an automated email from the git hooks/post-receive script.

js pushed a commit to tag dev-release-0.001-01
in repository libatteanx-query-cache-perl.

commit 0a821d4bceac35467a44af1e0e11722a6053c05a
Author: Kjetil Kjernsmo <kjetil at kjernsmo.net>
Date:   Wed Feb 17 21:57:58 2016 +0100

    make todo and run all the rest
---
 t/simple-sparql-tpf-planner.t | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

diff --git a/t/simple-sparql-tpf-planner.t b/t/simple-sparql-tpf-planner.t
index 94b2148..9f7cf54 100644
--- a/t/simple-sparql-tpf-planner.t
+++ b/t/simple-sparql-tpf-planner.t
@@ -109,7 +109,7 @@ my $test = TestLDFCreateStore->new;
 	isa_ok($model, 'AtteanX::Model::SPARQL');
 
 	subtest 'Empty BGP, to test basics' => sub {
-		plan skip_all => 'it works';
+		# plan skip_all => 'it works';
 		note("An empty BGP should produce the join identity table plan");
 		my $bgp		= Attean::Algebra::BGP->new(triples => []);
 		my $plan	= $p->plan_for_algebra($bgp, $model, [$graph]);
@@ -125,7 +125,7 @@ my $test = TestLDFCreateStore->new;
 		$cache->set('?v001 <http://example.org/m/p> "1" .', ['<http://example.org/foo>', '<http://example.org/bar>']);
 		$cache->set('?v001 <http://example.org/m/p> "dahut" .', ['<http://example.com/foo>', '<http://example.com/bar>']);
 		$cache->set('?v001 <http://example.org/m/dahut> "1" .', ['<http://example.org/dahut>']);
-		plan skip_all => 'it works';
+		# plan skip_all => 'it works';
 		
 		ok($model->is_cached(triplepattern(variable('foo'), iri('http://example.org/m/p'), literal('1'))->canonicalize->tuples_string), 'Cache has been set');
 		ok(! $model->is_cached(triplepattern(variable('foo'), iri('http://example.org/m/q'), literal('1'))->canonicalize->tuples_string), 'Cache has not been set');
@@ -147,7 +147,7 @@ my $test = TestLDFCreateStore->new;
 
 
 	subtest '4-triple BGP with join variable with cache one cached, no LDFs' => sub {
-		plan skip_all => 'it works';
+		# plan skip_all => 'it works';
 		# This test should result in a join between a three-quad SPARQL
 		# BGP and a table from the cache
 		my $bgp		= Attean::Algebra::BGP->new(triples => [$t, $u, $y, $x]);
@@ -178,7 +178,7 @@ my $test = TestLDFCreateStore->new;
 													 '<http://example.com/foo>' => ['<http://example.org/baz>', '<http://example.org/foobar>']});
 		$cache->set('?v001 <http://example.org/m/p> "dahut" .', ['<http://example.com/foo>', '<http://example.com/bar>']);
 		$cache->set('?v002 <http://example.org/m/dahut> ?v001 .', {'<http://example.org/dahut>' => ['"Foobar"']});
-		plan skip_all => 'it works';
+		# plan skip_all => 'it works';
 
 		ok($model->is_cached(triplepattern(variable('foo'), iri('http://example.org/m/p'), variable('bar'))->canonicalize->tuples_string), 'Cache has been set');
 		my $bgp		= Attean::Algebra::BGP->new(triples => [$u]);
@@ -198,7 +198,7 @@ my $test = TestLDFCreateStore->new;
 
 
 	subtest '2-triple BGP with join variable with cache on both' => sub {
-		plan skip_all => 'it works';
+		# plan skip_all => 'it works';
 		note("A 2-triple BGP with a join variable and without any ordering should produce two tables joined, no LDF interfering");
 		my $bgp		= Attean::Algebra::BGP->new(triples => [$t, $u]);
 		my @plans	= $p->plans_for_algebra($bgp, $model, [$graph]);
@@ -217,7 +217,7 @@ my $test = TestLDFCreateStore->new;
 	};
 
 	subtest '2-triple BGP with join variable with cache none cached' => sub {
-		plan skip_all => 'it works';
+		# plan skip_all => 'it works';
 		my $bgp		= Attean::Algebra::BGP->new(triples => [$w, $z]);
 		my @plans	= $p->plans_for_algebra($bgp, $model, [$graph]);
 		is(scalar @plans, 5, 'Got 5 plans');
@@ -243,7 +243,7 @@ my $test = TestLDFCreateStore->new;
 
 
 	subtest '2-triple BGP with join variable with cache one cached' => sub {
-		plan skip_all => 'it works';
+		# plan skip_all => 'it works';
 		my $bgp		= Attean::Algebra::BGP->new(triples => [$t, $x]);
 		my @plans	= $p->plans_for_algebra($bgp, $model, [$graph]);
 		is(scalar @plans, 5, 'Got 5 plans');
@@ -278,7 +278,10 @@ my $test = TestLDFCreateStore->new;
 		is(scalar @plans, 5, 'Got 5 plans');
 		my $plan = $plans[0];
 		does_ok($plan, 'Attean::API::Plan::Join');
-		is(scalar $plan->subpatterns_of_type('AtteanX::Store::SPARQL::Plan::BGP'), 1, 'Just one BGP');
+	 TODO: {
+			local $TODO = 'Should be a LDFTriple here';
+			is(scalar $plan->subpatterns_of_type('AtteanX::Store::SPARQL::Plan::BGP'), 1, 'Just one BGP');
+		}
 		my @c1plans = sort @{$plan->children};
 		does_ok($c1plans[0], 'Attean::API::Plan::Join', 'First child when sorted is a join');
 		isa_ok($c1plans[0], 'Attean::Plan::NestedLoopJoin', 'specifically NestedLoop Join') or diag($c1plans[0]->as_string);
@@ -296,9 +299,6 @@ my $test = TestLDFCreateStore->new;
 #		is($c2plans[1]->subject->value, 'a', 'LDF triple with subject variable a');
 	};
 
-done_testing;
-exit 0;
-
 	subtest '3-triple BGP where cache breaks the join to cartesian' => sub {
 		my $bgp		= Attean::Algebra::BGP->new(triples => [$z, $u, $y]);
 		my @plans	= $p->plans_for_algebra($bgp, $model, [$graph]);

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libatteanx-query-cache-perl.git