diff options
Diffstat (limited to 'xs/xsp/Point.xsp')
-rw-r--r-- | xs/xsp/Point.xsp | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/xs/xsp/Point.xsp b/xs/xsp/Point.xsp index 34017a3b4..60a4864e3 100644 --- a/xs/xsp/Point.xsp +++ b/xs/xsp/Point.xsp @@ -1,7 +1,7 @@ %module{Slic3r::XS}; %{ -#include <myinit.h> +#include <xsinit.h> #include "libslic3r/Point.hpp" #include "libslic3r/Polygon.hpp" #include "libslic3r/Polyline.hpp" @@ -15,9 +15,9 @@ void scale(double factor); void translate(double x, double y); SV* arrayref() - %code{% RETVAL = THIS->to_SV_pureperl(); %}; + %code{% RETVAL = to_SV_pureperl(THIS); %}; SV* pp() - %code{% RETVAL = THIS->to_SV_pureperl(); %}; + %code{% RETVAL = to_SV_pureperl(THIS); %}; long x() %code{% RETVAL = THIS->x; %}; long y() @@ -58,7 +58,7 @@ Point::rotate(angle, center_sv) SV* center_sv; CODE: Point center; - center.from_SV_check(center_sv); + from_SV_check(center_sv, ¢er); THIS->rotate(angle, center); bool @@ -66,7 +66,7 @@ Point::coincides_with(point_sv) SV* point_sv; CODE: Point point; - point.from_SV_check(point_sv); + from_SV_check(point_sv, &point); RETVAL = THIS->coincides_with(point); OUTPUT: RETVAL @@ -94,9 +94,9 @@ Point::coincides_with(point_sv) Clone<Pointf> clone() %code{% RETVAL = THIS; %}; SV* arrayref() - %code{% RETVAL = THIS->to_SV_pureperl(); %}; + %code{% RETVAL = to_SV_pureperl(THIS); %}; SV* pp() - %code{% RETVAL = THIS->to_SV_pureperl(); %}; + %code{% RETVAL = to_SV_pureperl(THIS); %}; double x() %code{% RETVAL = THIS->x; %}; double y() |