3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-10-30 20:21:12 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Use linestring_length() from Boost

Browse source
This commit is contained in:
Alessandro Ranellucci 2013-03-31 19:50:22 +02:00
parent 0d6ff22e19
commit bf809d1fd0
3 changed files with 4 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/Slic3r/ExPolygon.pm
View file

@ -7,7 +7,7 @@ use warnings;
use Boost::Geometry::Utils;
use List::Util qw(first);
use Math::Geometry::Voronoi;
use Slic3r::Geometry qw(X Y A B point_in_polygon same_line line_length epsilon);
use Slic3r::Geometry qw(X Y A B point_in_polygon same_line epsilon);
use Slic3r::Geometry::Clipper qw(union_ex JT_MITER);
# the constructor accepts an array of polygons
@ -131,7 +131,7 @@ sub encloses_line {
# optimization
return @$clip == 1 && same_line($clip->[0], $line);
} else {
return @$clip == 1 && abs(line_length($clip->[0]) - $line->length) < $tolerance;
return @$clip == 1 && abs(Boost::Geometry::Utils::linestring_length($clip->[0]) - $line->length) < $tolerance;
}
}

2
lib/Slic3r/Line.pm
View file

@ -29,7 +29,7 @@ sub coincides_with {
sub length {
my $self = shift;
return Slic3r::Geometry::line_length($self);
return Boost::Geometry::Utils::linestring_length($self);
}
sub vector {

4
lib/Slic3r/Polyline.pm
View file

@ -79,9 +79,7 @@ sub reverse {
sub length {
my $self = shift;
my $length = 0;
$length += $_->length for $self->lines;
return $length;
return Boost::Geometry::Utils::linestring_length($self);
}
sub grow {