From c7d5c912c1b639419eb91e99bacd979aac9da5de Mon Sep 17 00:00:00 2001 From: Thierry Moisan Date: Thu, 31 Jul 2008 12:03:27 -0400 Subject: [PATCH] Fixed error in gsl_vector_min test, we were using a vector which values weren't set --- lib/Math/GSL/Vector/Test.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lib/Math/GSL/Vector/Test.pm b/lib/Math/GSL/Vector/Test.pm index b5d6d72..ab468fc 100644 --- a/lib/Math/GSL/Vector/Test.pm +++ b/lib/Math/GSL/Vector/Test.pm @@ -99,10 +99,9 @@ sub GSL_VECTOR_SET: Tests { ok( $x == 5, "gsl_vector_set: $x ?= 5" ); } sub GSL_VECTOR_MIN: Tests { - my $self = shift; my $vec = Math::GSL::Vector->new( [ map { $_ ** 2 } (0..4) ] ); ok_similar( $vec->min ,0, '$vec->min' ); - ok_similar( gsl_vector_min($self->{vector}) ,0, 'gsl_vector_min' ); + ok_similar( gsl_vector_min($vec->raw) ,0, 'gsl_vector_min' ); } sub GSL_VECTOR_MAX: Tests { -- 2.11.4.GIT