Commit | Line | Data |
---|---|---|
184f15d5 JH |
1 | #!/usr/bin/perl -w |
2 | ||
184f15d5 | 3 | use strict; |
c32198f6 | 4 | use Test::More tests => 1; |
184f15d5 | 5 | |
c32198f6 FR |
6 | BEGIN { |
7 | unshift @INC, 't'; | |
8 | } | |
184f15d5 | 9 | |
116a1b2f | 10 | use Math::BigRat::Test lib => 'Calc'; # test via this Subclass |
184f15d5 JH |
11 | |
12 | use vars qw ($class $try $x $y $f @args $ans $ans1 $ans1_str $setup $CL); | |
13 | $class = "Math::BigRat::Test"; | |
14 | $CL = "Math::BigInt::Calc"; | |
15 | ||
c32198f6 | 16 | pass(); |
184f15d5 | 17 | |
116a1b2f | 18 | # fails still too many tests |
c32198f6 | 19 | #require 't/bigfltpm.inc'; # all tests here for sharing |