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

Bless arrayref representation into Slic3r classes

Browse source
This commit is contained in:
Alessandro Ranellucci 2013-07-07 13:34:55 +02:00
parent 53e4532f9c
commit 989e48ede0
5 changed files with 11 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

2
xs/src/ExPolygon.hpp
View file

@ -46,7 +46,7 @@ polygon2perl(Polygon& poly) {
for (unsigned int i = 0; i < num_points; i++) {
av_store(av, i, point2perl(poly[i]));
}
return (SV*)newRV_noinc((SV*)av);
return sv_bless(newRV_noinc((SV*)av), gv_stashpv("Slic3r::Polygon", GV_ADD));
}
#endif

2
xs/src/Point.hpp
View file

@ -21,7 +21,7 @@ point2perl(Point& point) {
AV* av = newAV();
av_fill(av, 1);
av_store_point_xy(av, point.x, point.y);
return (SV*)newRV_noinc((SV*)av);
return sv_bless(newRV_noinc((SV*)av), gv_stashpv("Slic3r::Point", GV_ADD));
}
#endif