3DPrinting/PrusaSlicer-NonPlainar
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Added failing test case for contains_point() not working on Windows. #1950

Browse Source
This commit is contained in:
Alessandro Ranellucci 2014-04-30 16:44:25 +02:00
parent 010b71e9d4
commit 93c1ae92c9
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
t/geometry.t
View File

@ -2,7 +2,7 @@ use Test::More;
use strict; use strict;
use warnings; use warnings;
plan tests => 28; plan tests => 29;
BEGIN { BEGIN {
use FindBin; use FindBin;
@ -13,6 +13,17 @@ use Slic3r;
use Slic3r::Geometry qw(PI polygon_is_convex use Slic3r::Geometry qw(PI polygon_is_convex
chained_path_from epsilon scale); chained_path_from epsilon scale);
{
# this test was failing on Windows (GH #1950)
my $polygon = Slic3r::Polygon->new(
[207802834,-57084522],[196528149,-37556190],[173626821,-25420928],[171285751,-21366123],
[118673592,-21366123],[116332562,-25420928],[93431208,-37556191],[82156517,-57084523],
[129714478,-84542120],[160244873,-84542120],
);
my $point = Slic3r::Point->new(95706562, -57294774);
ok $polygon->contains_point($point), 'contains_point';
}
#========================================================== #==========================================================
my $line1 = [ [5, 15], [30, 15] ]; my $line1 = [ [5, 15], [30, 15] ];