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

Massive reduction of memory usage (down to one third).

Browse Source
This commit is contained in:
Alessandro Ranellucci
2012-05-19 17:57:38 +02:00
parent 882a022e3a
commit b246480535
10 changed files with 75 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
lib/Slic3r/Polyline.pm
View File

@@ -21,6 +21,22 @@ sub new {
$self;
}
sub serialize {
my $self = shift;
my $s = \ pack 'l*', map @$_, @$self;
bless $s, ref $self;
return $s;
}
sub deserialize {
my $self = shift;
my @v = unpack '(l2)*', $$self;
my $o = [ map [ $v[2*$_], $v[2*$_+1] ], 0 .. int($#v/2) ];
bless $_, 'Slic3r::Point' for @$o;
bless $o, ref $self;
return $o;
}
sub id {
my $self = shift;
return join ' - ', sort map $_->id, @$self;