3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-08-10 15:25:18 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 3

Implemented split_at_index() and split_at_first_point() for Polygon

Browse source
This commit is contained in:
Alessandro Ranellucci 2013-07-15 23:38:06 +02:00
parent 62e5bd0ee7
commit 0d07a2e4e6
3 changed files with 29 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
xs/t/06_polygon.t
View file

@ -4,7 +4,7 @@ use strict;
use warnings;
use Slic3r::XS;
use Test::More tests => 4;
use Test::More tests => 6;
my $square = [ # ccw
[100, 100],
@ -27,4 +27,7 @@ is_deeply [ map $_->pp, @$lines ], [
[ [100, 200], [100, 100] ],
], 'polygon lines';
is_deeply $polygon->split_at_first_point->pp, $square, 'split_at_first_point';
is_deeply $polygon->split_at_index(2)->pp, [ @$square[2,3,0,1] ], 'split_at_index';
__END__