diff options
Diffstat (limited to 'xs/t/04_expolygon.t')
-rw-r--r-- | xs/t/04_expolygon.t | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/xs/t/04_expolygon.t b/xs/t/04_expolygon.t index 5c10651f8..39da22f0a 100644 --- a/xs/t/04_expolygon.t +++ b/xs/t/04_expolygon.t @@ -5,7 +5,7 @@ use warnings; use List::Util qw(first sum); use Slic3r::XS; -use Test::More tests => 33; +use Test::More tests => 31; use constant PI => 4 * atan2(1, 1); @@ -133,10 +133,4 @@ is $expolygon->area, 100*100-20*20, 'area'; is scalar(grep { $_->area == 100*200 } @$polygons), 1, 'trapezoids have expected area'; } -{ - my $triangles = $expolygon->triangulate_pp; - is scalar(@$triangles), 8, 'expected number of triangles'; - is sum(map $_->area, @$triangles), $expolygon->area, 'sum of triangles area equals original expolygon area'; -} - __END__ |