Bless arrayref representation into Slic3r classes

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

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