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:
authorEnrico Turri <enricoturri@seznam.cz>2018-06-22 12:19:38 +0300
committerEnrico Turri <enricoturri@seznam.cz>2018-06-22 12:19:38 +0300
commitac7d21b50a14a49e30c1b070799264b9e4547448 (patch)
treecda1d021f98b37e61a66ef9f346c2e12dc8fb5ca /xs/src/libslic3r/utils.cpp
parent266a4413bdcb680b253f9dc19d5ecadcd2d0beeb (diff)
Geometry info updated while using gizmos
Diffstat (limited to 'xs/src/libslic3r/utils.cpp')
-rw-r--r--xs/src/libslic3r/utils.cpp24
1 files changed, 21 insertions, 3 deletions
diff --git a/xs/src/libslic3r/utils.cpp b/xs/src/libslic3r/utils.cpp
index 745d07fcd..6178e6cba 100644
--- a/xs/src/libslic3r/utils.cpp
+++ b/xs/src/libslic3r/utils.cpp
@@ -262,7 +262,7 @@ void PerlCallback::call(double d) const
LEAVE;
}
-void PerlCallback::call(double x, double y) const
+void PerlCallback::call(double a, double b) const
{
if (!m_callback)
return;
@@ -270,8 +270,26 @@ void PerlCallback::call(double x, double y) const
ENTER;
SAVETMPS;
PUSHMARK(SP);
- XPUSHs(sv_2mortal(newSVnv(x)));
- XPUSHs(sv_2mortal(newSVnv(y)));
+ XPUSHs(sv_2mortal(newSVnv(a)));
+ XPUSHs(sv_2mortal(newSVnv(b)));
+ PUTBACK;
+ perl_call_sv(SvRV((SV*)m_callback), G_DISCARD);
+ FREETMPS;
+ LEAVE;
+}
+
+void PerlCallback::call(double a, double b, double c, double d) const
+{
+ if (!m_callback)
+ return;
+ dSP;
+ ENTER;
+ SAVETMPS;
+ PUSHMARK(SP);
+ XPUSHs(sv_2mortal(newSVnv(a)));
+ XPUSHs(sv_2mortal(newSVnv(b)));
+ XPUSHs(sv_2mortal(newSVnv(c)));
+ XPUSHs(sv_2mortal(newSVnv(d)));
PUTBACK;
perl_call_sv(SvRV((SV*)m_callback), G_DISCARD);
FREETMPS;