GitHub-Proxy/OrcaSlicer
1
0
Fork 0
mirror of https://git.mirrors.martin98.com/https://github.com/SoftFever/OrcaSlicer.git synced 2025-07-24 07:24:24 +08:00
Code Issues Packages Projects Releases Wiki Activity

New wkt() method for debugging

Browse Source
This commit is contained in:
Alessandro Ranellucci 2012-11-06 20:31:50 +01:00
parent 1db614a5a9
commit e21c806ee9
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lib/Slic3r/Polygon.pm
View File

@ -19,6 +19,11 @@ sub boost_linestring {
return Boost::Geometry::Utils::linestring([@$self, $self->[0]]); return Boost::Geometry::Utils::linestring([@$self, $self->[0]]);
} }
sub wkt {
my $self = shift;
return sprintf "POLYGON((%s))", join ',', map "$_->[0] $_->[1]", @$self;
}
sub is_counter_clockwise { sub is_counter_clockwise {
my $self = shift; my $self = shift;
return Slic3r::Geometry::Clipper::is_counter_clockwise($self); return Slic3r::Geometry::Clipper::is_counter_clockwise($self);