Fix tests here and there

This commit is contained in:
Alessandro Ranellucci 2013-07-15 15:26:56 +02:00
parent e485f0b130
commit 159a009f96
6 changed files with 17 additions and 15 deletions

View file

@ -42,11 +42,11 @@ use Slic3r::Test;
fail "insufficient number of bottom solid layers"
unless !defined(first { !$_ } @shells[0..$config->bottom_solid_layers-1]);
fail "excessive number of bottom solid layers"
unless scalar(grep $_, @shells[0 .. $#shells/2]) != $config->bottom_solid_layers;
unless scalar(grep $_, @shells[0 .. $#shells/2]) == $config->bottom_solid_layers;
fail "insufficient number of top solid layers"
unless !defined(first { !$_ } @shells[-$config->top_solid_layers..-1]);
fail "excessive number of top solid layers"
unless scalar(grep $_, @shells[($#shells/2)..$#shells]) != $config->top_solid_layers;
unless scalar(grep $_, @shells[($#shells/2)..$#shells]) == $config->top_solid_layers;
1;
};