10 unshift @INC, '../lib'; # for running manually
14 # test whether Math::BigInt constant works
18 ok (Math::BigInt->can('config'));
20 my $cfg = Math::BigInt->config();
22 ok (ref($cfg),'HASH');
24 ok ($cfg->{lib},'Math::BigInt::Calc');
25 ok ($cfg->{lib_version}, $Math::BigInt::Calc::VERSION);
26 ok ($cfg->{class},'Math::BigInt');
27 ok ($cfg->{upgrade}||'','');
28 ok ($cfg->{div_scale},40);
30 ok ($cfg->{precision}||0,0); # should test for undef
31 ok ($cfg->{accuracy}||0,0);
33 ok ($cfg->{round_mode},'even');