#!perl

###############################################################################

use strict;

use warnings;

use Test::More tests => 4;

use bignum a => '12';

my @CLASSES = qw/Math::BigInt Math::BigFloat/;

foreach my $class (@CLASSES) {

    is($class->accuracy(),12, "$class accuracy = 12");

}

bignum->import(accuracy => '23');

foreach my $class (@CLASSES) {

    is($class->accuracy(), 23, "$class accuracy = 23");

}