b38cc2c244
Conflicts: lib/Slic3r.pm lib/Slic3r/ExPolygon.pm lib/Slic3r/Fill.pm lib/Slic3r/Fill/Rectilinear.pm lib/Slic3r/GCode.pm lib/Slic3r/GUI/Plater.pm lib/Slic3r/Geometry/Clipper.pm lib/Slic3r/Layer/Region.pm lib/Slic3r/Print.pm lib/Slic3r/Print/Object.pm lib/Slic3r/TriangleMesh.pm t/shells.t xs/MANIFEST
53 lines
1.3 KiB
Plaintext
53 lines
1.3 KiB
Plaintext
ZTable* O_OBJECT
|
|
TriangleMesh* O_OBJECT
|
|
Point* O_OBJECT
|
|
Line* O_OBJECT
|
|
Polyline* O_OBJECT
|
|
Polygon* O_OBJECT
|
|
ExPolygon* O_OBJECT
|
|
ExPolygonCollection* O_OBJECT
|
|
ExtrusionEntityCollection* O_OBJECT
|
|
ExtrusionPath* O_OBJECT
|
|
ExtrusionLoop* O_OBJECT
|
|
Surface* O_OBJECT
|
|
SurfaceCollection* O_OBJECT
|
|
|
|
ExtrusionRole T_UV
|
|
SurfaceType T_UV
|
|
ClipperLib::JoinType T_UV
|
|
ClipperLib::PolyFillType T_UV
|
|
|
|
Lines T_ARRAYREF
|
|
Polygons T_ARRAYREF
|
|
ExPolygons T_ARRAYREF
|
|
|
|
INPUT
|
|
|
|
T_ARRAYREF
|
|
if (SvROK($arg) && SvTYPE(SvRV($arg)) == SVt_PVAV) {
|
|
AV* av = (AV*)SvRV($arg);
|
|
const unsigned int len = av_len(av)+1;
|
|
$type* tmp = new $type(len);
|
|
for (unsigned int i = 0; i < len; i++) {
|
|
SV** elem = av_fetch(av, i, 0);
|
|
(*tmp)[i].from_SV_check(*elem);
|
|
}
|
|
$var = *tmp;
|
|
delete tmp;
|
|
} else
|
|
Perl_croak(aTHX_ \"%s: %s is not an array reference\",
|
|
${$ALIAS?\q[GvNAME(CvGV(cv))]:\qq[\"$pname\"]},
|
|
\"$var\");
|
|
|
|
OUTPUT
|
|
|
|
T_ARRAYREF
|
|
AV* av = newAV();
|
|
$arg = newRV_noinc((SV*)av);
|
|
av_extend(av, $var.size()-1);
|
|
int i = 0;
|
|
for (${type}::iterator it = $var.begin(); it != $var.end(); ++it) {
|
|
av_store(av, i++, (*it).to_SV_ref());
|
|
}
|
|
$var.clear();
|