From 89ed37655318bc2ce4674fa0051d2936e8d778da Mon Sep 17 00:00:00 2001
From: Michael Kirsch <mkirsch.git@gmail.com>
Date: Sun, 14 Jul 2019 00:13:52 +0200
Subject: [PATCH] expose mesh transform cloning to perl

---
 xs/xsp/TriangleMesh.xsp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/xs/xsp/TriangleMesh.xsp b/xs/xsp/TriangleMesh.xsp
index 0bff01bdd0..6c58367ba0 100644
--- a/xs/xsp/TriangleMesh.xsp
+++ b/xs/xsp/TriangleMesh.xsp
@@ -20,6 +20,8 @@
     void align_to_bed();
     void transform(TransformationMatrix* trafo)
         %code{% THIS->transform(*trafo); %};
+    Clone<TriangleMesh> get_transformed_mesh(TransformationMatrix* trafo)
+        %code{% RETVAL=THIS->get_transformed_mesh(*trafo); %};
     TriangleMeshPtrs split();
     TriangleMeshPtrs cut_by_grid(Pointf* grid)
         %code{% RETVAL = THIS->cut_by_grid(*grid); %};