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

New ->scale() method for ExPolygon::XS

Browse source
This commit is contained in:
Alessandro Ranellucci 2013-07-11 14:08:11 +02:00
parent 5409c27852
commit e0052b01d3
3 changed files with 24 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

16
xs/src/ExPolygon.hpp
View file

@ -19,8 +19,24 @@ class ExPolygon
Polygon contour;
Polygons holes;
SV* arrayref();
void scale(double factor);
};
#define scale_polygon(poly, factor) \
for (Polygon::iterator pit = (poly).begin(); pit != (poly).end(); ++pit) { \
(*pit).x *= factor; \
(*pit).y *= factor; \
}
void
ExPolygon::scale(double factor)
{
scale_polygon(contour, factor);
for (Polygons::iterator it = holes.begin(); it != holes.end(); ++it) {
scale_polygon(*it, factor);
}
}
void
perl2polygon(SV* poly_sv, Polygon& poly)
{