diff options
| author | Alessandro Ranellucci <aar@cpan.org> | 2011-10-07 21:07:57 +0400 |
|---|---|---|
| committer | Alessandro Ranellucci <aar@cpan.org> | 2011-10-07 21:07:57 +0400 |
| commit | 743f2abcf2e361f8830de560d24d4bb095139aa9 (patch) | |
| tree | 01d88d0a9361617d254363d57e3a43e2e1ab5739 /t/geometry.t | |
| parent | 1cb515a8e522a31024f952c7b9b423ed48c4a15e (diff) | |
Detection of optimal infill direction for bridges. Includes many fixes and improvements.
Diffstat (limited to 't/geometry.t')
| -rw-r--r-- | t/geometry.t | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/t/geometry.t b/t/geometry.t index decdad899..fce157ed8 100644 --- a/t/geometry.t +++ b/t/geometry.t @@ -2,7 +2,7 @@ use Test::More; use strict; use warnings; -plan tests => 5; +plan tests => 6; BEGIN { use FindBin; @@ -49,6 +49,12 @@ is Slic3r::Geometry::point_in_segment($point, $line), 0, 'point_in_segment'; #========================================================== +$point = [ 736310778.185108, 5017423926.8924 ]; +my $line = [ [627484000, 3695776000], [750000000, 3720147000] ]; +is Slic3r::Geometry::point_in_segment($point, $line), 0, 'point_in_segment'; + +#========================================================== + my $polygons = [ [ # contour, ccw [459190000, 5152739000], [147261000, 4612464000], [147261000, 3487535000], [339887000, 3153898000], |