3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-08-07 22:14:00 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Incomplete work for porting simplify() to XS

Browse source
This commit is contained in:
Alessandro Ranellucci 2013-11-21 20:25:24 +01:00
parent 7475762a27
commit 518798beb3
24 changed files with 121 additions and 41 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/Slic3r/Print.pm
View file

@ -317,14 +317,8 @@ sub _simplify_slices {
my ($distance) = @_;
foreach my $layer (map @{$_->layers}, @{$self->objects}) {
my @new = map $_->simplify($distance), map $_->clone, @{$layer->slices};
$layer->slices->clear;
$layer->slices->append(@new);
foreach my $layerm (@{$layer->regions}) {
my @new = map $_->simplify($distance), map $_->clone, @{$layerm->slices};
$layerm->slices->clear;
$layerm->slices->append(@new);
}
$layer->slices->simplify($distance);
$_->slices->simplify($distance) for @{$layer->regions};
}
}