juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-19 11:23:42 +00:00
Code Issues Packages Projects Releases Wiki Activity

Removed more unused functions and fixed tests

Browse Source
This commit is contained in:
Alessandro Ranellucci
2013-11-22 16:19:15 +01:00
parent 132d170f73
commit a950fbe0c2
7 changed files with 20 additions and 208 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
t/polyclip.t
View File

@@ -2,7 +2,7 @@ use Test::More;
use strict;
use warnings;
plan tests => 19;
plan tests => 18;
BEGIN {
use FindBin;
@@ -78,14 +78,6 @@ my $square = Slic3r::Polygon->new( # ccw
is $intersection->[0]->length, Slic3r::Line->new([100,180], [200,180])->length,
'tangent line is clipped to square with hole';
}
{
my $polyline = Slic3r::Polyline->new([50, 180], [250, 180], [250, 150], [150, 150], [150, 120], [120, 120], [120, 50]);
is_deeply [ map $_->pp, $polyline->clip_with_expolygon($expolygon) ], [
[ [100, 180], [200, 180] ],
[ [200, 150], [160, 150] ],
[ [150, 140], [150, 120], [120, 120], [120, 100] ],
], 'polyline is clipped to square with hole';
}
}
#==========================================================