Skip to content
Snippets Groups Projects
Commit 61f1ef22 authored by Magali Ruffier's avatar Magali Ruffier
Browse files

added tests for method fethc_all

parent c395eb23
No related branches found
No related tags found
No related merge requests found
......@@ -180,6 +180,15 @@ ok( $stored_features[0]->length() > 10000 );
print $stored_features[0]->length() . "\n";
ok( $stored_features[0]->length() == 1000 );
# Check for fetching all features
@stored_features = @{$dfa->fetch_all()};
is( @stored_features, 318, 'Number of stored features');
@stored_features = @{$dfa->fetch_all('GeneDensityTest')};
ok( $stored_features[0]->length() > 1000 );
is( @stored_features, 306, "Number of stored gene densities");
@stored_features = @{$dfa->fetch_all('rubbish')};
ok( @stored_features == 0);
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment