kind of expose the transformation object to perl

This commit is contained in:
Michael Kirsch 2019-07-14 00:57:39 +02:00 committed by Joseph Lenox
parent 83c98871ba
commit 79c4ee16e1

View File

@ -281,6 +281,9 @@ ModelMaterial::attributes()
void set_input_file_vol_idx(int vol_idx)
%code%{ THIS->input_file_vol_idx = vol_idx; %};
Clone<TransformationMatrix> get_transformation()
%code%{ RETVAL = THIS->trafo; %};
t_model_material_id material_id();
void set_material_id(t_model_material_id material_id)
%code%{ THIS->material_id(material_id); %};
@ -300,6 +303,9 @@ ModelMaterial::attributes()
%code{% THIS->scale(*versor); %};
void rotate(double angle, Axis axis);
void apply_transformation(TransformationMatrix* trafo)
%code{% THIS->apply_transformation(*trafo); %};
Ref<DynamicPrintConfig> config()
%code%{ RETVAL = &THIS->config; %};
Ref<TriangleMesh> mesh()