lib/Math/GSL/Matrix/Test.pm

   1 package Math::GSL::Matrix::Test;
   2 use base q{Test::Class};
   3 use Test::More;
   4 use Math::GSL::Matrix qw/:all/;
   5 use Math::GSL qw/is_similar/;
   6 use strict;
   7
   8 sub make_fixture : Test(setup) {
   9 }
  10
  11 sub teardown : Test(teardown) {
  12 }
  13
  14 sub GSL_MATRIX_ALLOC : Test {
  15     my $matrix = gsl_matrix_alloc(5,5);
  16     isa_ok($matrix, 'Math::GSL::Matrix');
  17 }
  18
  19 1;