juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-30 16:42:43 +00:00
Code Issues Packages Projects Releases Wiki Activity

Remove any Perl related code from libslic3r

Browse Source
This commit is contained in:
Alessandro Ranellucci
2015-12-08 00:39:54 +01:00
parent 3fac8cd77e
commit 4913e90e10
105 changed files with 907 additions and 1066 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
xs/xsp/Point.xsp
View File

@@ -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, &center);
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()