Some initial work for porting slice()

This commit is contained in:
Alessandro Ranellucci 2013-09-07 14:06:09 +02:00
parent 8607c559c7
commit 346c17d483
6 changed files with 126 additions and 1 deletions

View file

@ -44,4 +44,11 @@ my $cube = {
ok abs($m->size->[0] - sqrt(2)*40) < 1E-4, 'rotate';
}
{
my $m = Slic3r::TriangleMesh::XS->new;
$m->ReadFromPerl($cube->{vertices}, $cube->{facets});
$m->Repair;
my $result = $m->slice([2,4,8,6,8,10,12,14,16,18]);
}
__END__