3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-08-06 13:34:05 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

Export Slic3r::Test::_eq()

Browse source
This commit is contained in:
Alessandro Ranellucci 2012-12-21 13:25:03 +01:00
parent 494a1a84cf
commit 701c98c5a7
2 changed files with 11 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/Slic3r/Test.pm
View file

@ -2,6 +2,10 @@ package Slic3r::Test;
use strict;
use warnings;
require Exporter;
our @ISA = qw(Exporter);
our @EXPORT_OK = qw(_eq);
use IO::Scalar;
use Slic3r::Geometry qw(epsilon);
@ -48,7 +52,7 @@ sub gcode {
return $gcode;
}
sub compare {
sub _eq {
my ($a, $b) = @_;
return abs($a - $b) < epsilon;
}