diff options
author | Alessandro Ranellucci <aar@cpan.org> | 2014-05-21 17:03:31 +0400 |
---|---|---|
committer | Alessandro Ranellucci <aar@cpan.org> | 2014-05-21 17:03:31 +0400 |
commit | 08279ec5d8b4ae01b6c09fca8b8e02b146d0de7d (patch) | |
tree | 120e18930a0eebdf1948206603fa5047f4d46d99 /t/thin.t | |
parent | a8b6e327671237f516023ba5bd0b75bd998d6cbe (diff) |
Bugfix: thin walls forming a closed loop had overlapping segments at their endpoints. #1948 #1875
Diffstat (limited to 't/thin.t')
-rw-r--r-- | t/thin.t | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -1,4 +1,4 @@ -use Test::More tests => 11; +use Test::More tests => 13; use strict; use warnings; @@ -62,7 +62,9 @@ if (0) { ); my $expolygon = Slic3r::ExPolygon->new($square, $hole_in_square); my $res = $expolygon->medial_axis(scale 1, scale 0.5); - is scalar(@$res), 1, 'medial axis of a square shape is a single closed loop'; + is scalar(@$res), 1, 'medial axis of a square shape is a single path'; + isa_ok $res->[0], 'Slic3r::Polyline', 'medial axis result is a polyline'; + ok $res->[0]->first_point->coincides_with($res->[0]->last_point), 'polyline forms a closed loop'; ok $res->[0]->length > $hole_in_square->length && $res->[0]->length < $square->length, 'medial axis loop has reasonable length'; } |