3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-10-31 04:31:15 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Port PrintRegion::flow() and LayerRegion.flow() to XS

Browse source
This commit is contained in:
Alessandro Ranellucci 2014-08-03 19:17:23 +02:00
parent 380dd8adfc
commit 7ff13c063f
11 changed files with 80 additions and 85 deletions
Download patch file Download diff file Expand all files Collapse all files

14
lib/Slic3r/Layer/Region.pm
View file

@ -28,18 +28,6 @@ sub print { return $_[0]->layer->print; }
sub config { return $_[0]->region->config; }
sub flow {
my ($self, $role, $bridge, $width) = @_;
return $self->region->flow(
$role,
$self->layer->height,
$bridge // 0,
$self->layer->id == 0,
$width,
$self->object,
);
}
sub merge_slices {
my ($self) = @_;
@ -67,7 +55,7 @@ sub make_perimeters {
my $ext_pspacing = scale($ext_perimeter_flow->spacing_to($perimeter_flow));
# overhang perimeters
my $overhang_flow = $self->region->flow(FLOW_ROLE_PERIMETER, -1, 1, 0, undef, $self->layer->object);
my $overhang_flow = $self->region->flow(FLOW_ROLE_PERIMETER, -1, 1, 0, -1, $self->layer->object);
my $mm3_per_mm_overhang = $overhang_flow->mm3_per_mm;
# solid infill