Trace.pm revision 7c478bd95313f5f23a4c958a745db2134aa03244
require 5.005_02;
use strict;
use Exporter;
$VERSION = 0.01;
use overload; # inherit overload from BigInt
# Globals
$round_mode = 'even';
$div_scale = 40;
sub new
{
my $proto = shift;
my $value = shift;
return $self;
}
sub import
{
print "MBI import ",join(' ',@_);
my $self = shift;
# $self->export_to_level(1,$self,@_); # need this ?
@_ = ();
}
1;