blob: 2c80f7fedda8a4d7104ad41af0a753a5ab4fd896 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
#!/usr/bin/perl -w
# test rounding, accuracy, precicion and fallback, round_mode and mixing
# of classes under BareCalc
use strict;
use Test::More tests => 684
+ 1; # our own tests
BEGIN { unshift @INC, 't'; }
print "# ",Math::BigInt->config()->{lib},"\n";
use Math::BigInt lib => 'BareCalc';
use Math::BigFloat lib => 'BareCalc';
use vars qw/$mbi $mbf/;
$mbi = 'Math::BigInt';
$mbf = 'Math::BigFloat';
is (Math::BigInt->config()->{lib},'Math::BigInt::BareCalc');
require 't/mbimbf.inc';
|
