%define perl_major_ver %(eval `perl -V:version`; echo ${version%*.[0-9]*}.0) Name: perl-Test-Number-Delta Version: 1.06 Release: 1mamba Summary: Test::Number::Delta - Compare the difference between numbers against a given tolerance Group: System/Libraries/Perl Vendor: openmamba Distribution: openmamba Packager: Silvan Calarco URL: https://www.cpan.org/ Source: https://cpan.metacpan.org/modules/by-module/Test/Test-Number-Delta-%{version}.tar.gz License: GPL, Artistic ## AUTOBUILDREQ-BEGIN BuildRequires: perl-devel ## AUTOBUILDREQ-END BuildRequires: perl-devel >= %perl_major_ver Requires: perl >= %perl_major_ver %description At some point or another, most programmers find they need to compare floating-point numbers for equality. The typical idiom is to test if the absolute value of the difference of the numbers is within a desired tolerance, usually called epsilon. This module provides such a function for use with Test::Harness. Usage is similar to other test functions described in Test::More. Semantically, the delta_within function replaces this kind of construct: ok ( abs($p - $q) < $epsilon, '$p is equal to $q' ) or diag "$p is not equal to $q to within $epsilon"; While there's nothing wrong with that construct, it's painful to type it repeatedly in a test script. This module does the same thing with a single function call. The delta_ok function is similar, but either uses a global default value for epsilon or else calculates a 'relative' epsilon on the fly so that epsilon is scaled automatically to the size of the arguments to delta_ok. Both functions are exported automatically. Because checking floating-point equality is not always reliable, it is not possible to check the 'equal to' boundary of 'less than or equal to epsilon'. Therefore, Test::Number::Delta only compares if the absolute value of the difference is less than epsilon (for equality tests) or greater than epsilon (for inequality tests). %prep %setup -q -n Test-Number-Delta-%{version} %build %{__perl} Makefile.PL PREFIX=%{_prefix} INSTALLDIRS=vendor OPTIMIZE="%{optflags}" %make %make test %install [ "%{buildroot}" != / ] && rm -rf "%{buildroot}" %makeinstall_perl packlist=`find %{buildroot} -name .packlist` [ -z "$packlist" ] && exit 1 || cat $packlist | \ sed "s,%{buildroot},,g;s,.*/man/.*,&.gz,g" | \ sort -u > .packlist && rm -f $packlist strid=`echo $packlist | sed 's,.*auto\(.*\)/.packlist,\1,'` for dir in `find %{buildroot} -type d | grep $strid`; do echo "%dir ${dir#%buildroot}" >> .packlist done %clean [ "%{buildroot}" != / ] && rm -rf "%{buildroot}" %files -f .packlist %defattr(-,root,root) %changelog * Sun May 16 2021 Automatic Build System 1.06-1mamba - automatic version update by autodist * Thu Aug 29 2013 Automatic Build System 1.03-3mamba - automatic rebuild by autodist * Wed Nov 05 2008 Silvan Calarco 1.03-2mamba - automatic rebuild by autodist * Mon Oct 20 2008 gil 1.03-1mamba - package created by autospec