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

Refactoring. Point objects are now plain arrayrefs. Slicing is 30% faster.

Browse source
This commit is contained in:
Alessandro Ranellucci 2011-10-12 14:54:49 +02:00
parent 774717c8bb
commit e410410dc7
10 changed files with 44 additions and 55 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/Slic3r/Line.pm
View file

@ -13,7 +13,7 @@ sub cast {
my ($line, %args) = @_;
if (ref $line eq 'ARRAY') {
@$line == 2 or die "Line needs two points!";
return $class->new(points => [ map Slic3r::Point->cast($_), @$line ], %args);
return $class->new(points => [ map Slic3r::Point->new($_), @$line ], %args);
} else {
return $line;
}
@ -39,7 +39,7 @@ sub coordinates {
sub p {
my $self = shift;
return [ $self->a->p, $self->b->p ];
return [ $self->a, $self->b ];
}
sub coincides_with {