Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/prusa3d/PrusaSlicer.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlessandro Ranellucci <aar@cpan.org>2013-07-07 14:41:54 +0400
committerAlessandro Ranellucci <aar@cpan.org>2013-07-07 14:41:54 +0400
commitd06ac3e31e416054a03f4dd84a035f7e1080d33a (patch)
tree475fbd2c9e8c3a09e9c96ae2a074be620a426356
parentb42333feedbc51fe4211b270c4560def37346f2c (diff)
Rename _toPerl() to arrayref()
-rw-r--r--xs/lib/Slic3r/XS.pm4
-rw-r--r--xs/src/ExPolygon.hpp2
-rw-r--r--xs/xsp/ExPolygon.xsp2
-rw-r--r--xs/xsp/Point.xsp2
4 files changed, 5 insertions, 5 deletions
diff --git a/xs/lib/Slic3r/XS.pm b/xs/lib/Slic3r/XS.pm
index 8df63af91..1998cf130 100644
--- a/xs/lib/Slic3r/XS.pm
+++ b/xs/lib/Slic3r/XS.pm
@@ -9,10 +9,10 @@ XSLoader::load(__PACKAGE__, $VERSION);
package Slic3r::Point::XS;
use overload
- '@{}' => sub { $_[0]->_toPerl };
+ '@{}' => sub { $_[0]->arrayref };
package Slic3r::ExPolygon::XS;
use overload
- '@{}' => sub { $_[0]->_toPerl };
+ '@{}' => sub { $_[0]->arrayref };
1;
diff --git a/xs/src/ExPolygon.hpp b/xs/src/ExPolygon.hpp
index 14c809c20..0ee9c28a6 100644
--- a/xs/src/ExPolygon.hpp
+++ b/xs/src/ExPolygon.hpp
@@ -18,7 +18,7 @@ class ExPolygon
public:
Polygon contour;
Polygons holes;
- SV* _toPerl();
+ SV* arrayref();
};
Polygon*
diff --git a/xs/xsp/ExPolygon.xsp b/xs/xsp/ExPolygon.xsp
index 0c8bdbf9e..a69fd26b6 100644
--- a/xs/xsp/ExPolygon.xsp
+++ b/xs/xsp/ExPolygon.xsp
@@ -21,7 +21,7 @@ ExPolygon::new(...)
RETVAL
SV*
-ExPolygon::_toPerl()
+ExPolygon::arrayref()
CODE:
const unsigned int num_holes = THIS->holes.size();
AV* av = newAV();
diff --git a/xs/xsp/Point.xsp b/xs/xsp/Point.xsp
index ac1b74e89..372d1edd0 100644
--- a/xs/xsp/Point.xsp
+++ b/xs/xsp/Point.xsp
@@ -10,7 +10,7 @@
%{
SV*
-Point::_toPerl()
+Point::arrayref()
CODE:
RETVAL = point2perl(*THIS);
OUTPUT: