diff options
author | Daniel Friesel <derf@finalrewind.org> | 2017-07-05 22:51:50 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2017-07-05 22:51:50 +0200 |
commit | 8983a47325879826eed1fb3324f8c3de9a7ba4a7 (patch) | |
tree | 0fbc7fb010ef948355e17b44ea2ea0f7fa58c633 | |
parent | 8790ffdf260822253dc75594b6a105b234f4c53a (diff) |
Use Test::Number::Delta for floating point comparisons
This avoids issues caused by varying float behaviour on different systems
-rw-r--r-- | Build.PL | 1 | ||||
-rw-r--r-- | t/21-iris-stations.t | 16 |
2 files changed, 11 insertions, 6 deletions
@@ -10,6 +10,7 @@ Module::Build->new( 'Test::Compile' => 0, 'Test::Fatal' => 0, 'Test::More' => 0, + 'Test::Number::Delta' => 0, 'Test::Pod' => 0, 'Text::CSV' => 0, }, diff --git a/t/21-iris-stations.t b/t/21-iris-stations.t index f68e5bb..497148b 100644 --- a/t/21-iris-stations.t +++ b/t/21-iris-stations.t @@ -4,7 +4,8 @@ use warnings; use 5.014; use utf8; -use Test::More tests => 15; +use Test::More tests => 17; +use Test::Number::Delta; BEGIN { use_ok('Travel::Status::DE::IRIS::Stations'); @@ -98,11 +99,14 @@ is_deeply( 'get_station_by_location: 10 matches for Foobar' ); +is(scalar Travel::Status::DE::IRIS::Stations::get_station_by_location(7.02458, 51.43862, 1), + 1, 'get_station_by_location(Foobar): only one match'); + is_deeply( - [ Travel::Status::DE::IRIS::Stations::get_station_by_location(7.02458, 51.43862, 1) ], - [ - [[ 'EESD', 'Essen Süd', 8001897, 7.023098, 51.439295], 0.127234298397033] - ], - 'get_station_by_location: 1 match with all data for Foobar' + (Travel::Status::DE::IRIS::Stations::get_station_by_location(7.02458, 51.43862, 1))[0][0], + [ 'EESD', 'Essen Süd', 8001897, 7.023098, 51.439295], + 'get_station_by_location(Foobar): correct location data' ); +delta_ok((Travel::Status::DE::IRIS::Stations::get_station_by_location(7.02458, 51.43862, 1))[0][1], + 0.127234298397033, 'get_station_by_location(Foobar): correct distance'); |