PublicCodeMirror/OrcaSlicer-bambulab
1
0
Fork 0
mirror of https://github.com/FULU-Foundation/OrcaSlicer-bambulab.git synced 2026-05-14 13:02:39 -07:00
Code Issues Packages Projects Releases Wiki Activity

Update tests after recent serialization changes

Browse Source
This commit is contained in:
Alessandro Ranellucci
2012-07-21 14:57:41 +02:00
parent c7bc9bed46
commit f977aff82d
2 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
t/arcs.t
View File

@@ -59,8 +59,7 @@ use Slic3r::Geometry qw(epsilon scale X Y);
isa_ok $collection1->paths->[0], 'Slic3r::ExtrusionPath::Arc', 'path'; isa_ok $collection1->paths->[0], 'Slic3r::ExtrusionPath::Arc', 'path';
isa_ok $collection2->paths->[0], 'Slic3r::ExtrusionPath::Arc', 'path'; isa_ok $collection2->paths->[0], 'Slic3r::ExtrusionPath::Arc', 'path';
$_->deserialize for $collection1->paths->[0], $collection2->paths->[0];
my $expected_length = scale 7.06858347057701; my $expected_length = scale 7.06858347057701;
ok abs($collection1->paths->[0]->length - $expected_length) < scale epsilon, 'cw oriented arc has correct length'; ok abs($collection1->paths->[0]->length - $expected_length) < scale epsilon, 'cw oriented arc has correct length';
ok abs($collection2->paths->[0]->length - $expected_length) < scale epsilon, 'ccw oriented arc has correct length'; ok abs($collection2->paths->[0]->length - $expected_length) < scale epsilon, 'ccw oriented arc has correct length';

2
t/serialize.t
View File

@@ -23,7 +23,7 @@ use Slic3r::Geometry qw(scale);
} }
my $polyline = Slic3r::Polyline->new($points); my $polyline = Slic3r::Polyline->new($points);
my $serialized = $polyline->serialize; my $serialized = $polyline->serialize;
my $deserialized = $serialized->deserialize; my $deserialized = Slic3r::Polyline->deserialize($serialized);
is scalar(@$deserialized), scalar(@$points), 'number of deserialized points'; is scalar(@$deserialized), scalar(@$points), 'number of deserialized points';
is_deeply $deserialized, $points, 'deserialized points coordinates'; is_deeply $deserialized, $points, 'deserialized points coordinates';
} }