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

Remove ->ToPerl and add ->vertices and ->facets

Browse Source
This commit is contained in:
Alessandro Ranellucci
2013-08-04 21:23:27 +02:00
parent 6f1a1b546f
commit a0bd152243
4 changed files with 46 additions and 40 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
xs/t/01_trianglemesh.t
View File

@@ -18,7 +18,8 @@ my $cube = {
my $m = Slic3r::TriangleMesh::XS->new;
$m->ReadFromPerl($cube->{vertices}, $cube->{facets});
$m->Repair;
my ($vertices, $facets) = @{$m->ToPerl};
my ($vertices, $facets) = ($m->vertices, $m->facets);
is_deeply $vertices, $cube->{vertices}, 'vertices arrayref roundtrip';
is_deeply $facets, $cube->{facets}, 'facets arrayref roundtrip';