CPAN::Groonga

pect fail');
isnt($ret->failed, 0, 'False check not not fail');
isnt($ret->passed, 1, 'False check not pass');
$ret = $t->execute('repair');
is($ret->passed, 1, 'Repair expect pass');
isnt($ret->passe

ir not not pass');
isnt($ret->failed, 1, 'Repair not fail');
$ret = $t->execute('check');
is($ret->passed, 1, 'Check expect pass');
isnt($ret->passed, 0, 'Check not not pass');
isnt($ret->failed, 1, '

pect fail');
isnt($ret->failed, 0, 'False check not not fail');
isnt($ret->passed, 1, 'False check not pass');
$ret = $t->execute('repair');
is($ret->passed, 1, 'Repair expect pass');
isnt($ret->passe

ir not not pass');
isnt($ret->failed, 1, 'Repair not fail');
$ret = $t->execute('check');
is($ret->passed, 1, 'Check expect pass');
isnt($ret->passed, 0, 'Check not not pass');
isnt($ret->failed, 1, '

l');
$ret = $t->execute('check');
is($ret->failed, 1, 'False expect fail');
isnt($ret->failed, 0, 'False not not fail');
isnt($ret->passed, 1, 'False not pass');
# Repair
$t = pkg('test', 'testpass');

= $t->execute('repair');
is($ret->passed, 1, 'True repair expect pass');
isnt($ret->passed, 0, 'True repair not not pass');
isnt($ret->failed, 1, 'True repair not fail');
# Pass
$t = pkg('test', 'test

pass');
$ret = $t->execute('check');
is($ret->passed, 1, 'True expect pass');
isnt($ret->passed, 0, 'True not not pass');
isnt($ret->failed, 1, 'True not fail');

1;

>check, Csistck::Test::Return, "Manual check return" );
is($t->check->passed, 1, 'Check passed');
isnt($t->check->failed, 'Check did not fail');
is($t->execute('check')->passed, 1, 'Full check');
is($