Browse Source

Rename _toPerl() to arrayref()

Alessandro Ranellucci 11 years ago
parent
commit
d06ac3e31e
4 changed files with 5 additions and 5 deletions
  1. 2 2
      xs/lib/Slic3r/XS.pm
  2. 1 1
      xs/src/ExPolygon.hpp
  3. 1 1
      xs/xsp/ExPolygon.xsp
  4. 1 1
      xs/xsp/Point.xsp

+ 2 - 2
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;

+ 1 - 1
xs/src/ExPolygon.hpp

@@ -18,7 +18,7 @@ class ExPolygon
     public:
     Polygon contour;
     Polygons holes;
-    SV* _toPerl();
+    SV* arrayref();
 };
 
 Polygon*

+ 1 - 1
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();

+ 1 - 1
xs/xsp/Point.xsp

@@ -10,7 +10,7 @@
 %{
 
 SV*
-Point::_toPerl()
+Point::arrayref()
     CODE:
         RETVAL = point2perl(*THIS);
     OUTPUT: