juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-19 03:13:39 +00:00
Code Issues Packages Projects Releases Wiki Activity

Ported three PrintObject methods to XS

Browse Source
This commit is contained in:
Alessandro Ranellucci
2014-11-13 00:34:56 +01:00
parent f8986d0ef5
commit 33fe53fd7c
5 changed files with 31 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
lib/Slic3r/Print/Object.pm
View File

@@ -32,26 +32,6 @@ sub support_layers {
return [ map $self->get_support_layer($_), 0..($self->support_layer_count - 1) ];
}
# in unscaled coordinates
sub add_copy {
my ($self, $x, $y) = @_;
my @copies = @{$self->copies};
push @copies, Slic3r::Point->new_scale($x, $y);
return $self->set_copies(\@copies);
}
sub delete_last_copy {
my ($self) = @_;
my @copies = $self->copies;
pop @copies;
return $self->set_copies(\@copies);
}
sub delete_all_copies {
my ($self) = @_;
return $self->set_copies([]);
}
# this is the *total* layer count (including support layers)
# this value is not supposed to be compared with $layer->id
# since they have different semantics