[perl5.git] / dist / Math-BigInt / t / bare_mbf.t

#!/usr/bin/perl -w

use strict;
use Test::More tests => 2338;

BEGIN { unshift @INC, 't'; }

use Math::BigFloat lib => 'BareCalc';

use vars qw ($class $try $x $y $f @args $ans $ans1 $ans1_str $setup $CL);
$class = "Math::BigFloat";
$CL = "Math::BigInt::BareCalc";

require 't/bigfltpm.inc';	# all tests here for sharing
Commit	Line	Data
b3abae2a JH	1	#!/usr/bin/perl -w
b3abae2a JH	2
b3abae2a	3	use strict;
6358232b	4	use Test::More tests => 2338;
b3abae2a	5
3167abe5	6	BEGIN { unshift @INC, 't'; }
b3abae2a	7
56b9c951	8	use Math::BigFloat lib => 'BareCalc';
b3abae2a JH	9
	10	use vars qw ($class $try $x $y $f @args $ans $ans1 $ans1_str $setup $CL);
	11	$class = "Math::BigFloat";
	12	$CL = "Math::BigInt::BareCalc";
d5735945	13
4aa37faf	14	require 't/bigfltpm.inc'; # all tests here for sharing