Lines Matching refs:_new
168 $self->{_e} = $MBI->_new($$ev); # exponent
172 $self->{_m} = $MBI->_new($mantissa); # create mant.
177 my $len = $MBI->_new( CORE::length($$mfv));
189 my $z = $MBI->_new($zeros);
473 $ym = $MBI->_lsft($ym, $MBI->_new($diff), 10);
478 $xm = $MBI->_lsft($xm, $MBI->_new(-$diff), 10);
537 $ym = $MBI->_lsft($ym, $MBI->_new($diff), 10);
542 $xm = $MBI->_lsft($xm, $MBI->_new(-$diff), 10);
1038 _e_sub( $x->{_e}, $MBI->_new($dbd), $x->{_es}, $dbd_sign); # 123 => 1.23
1319 $MBI->_lsft($x->{_m},$MBI->_new($scale),10);
1326 _e_sub($x->{_e}, $MBI->_new($scale), $x->{_es}, '+');
1433 $x->{_e} = $MBI->_new($shiftx);
1436 $MBI->_add( $x->{_e}, $MBI->_new($shifty)) if $shifty != 0;
1694 $MBI->_lsft( $y1, $MBI->_new($s2), 10);
1723 $x->{_e} = $MBI->_new( $dat );
1728 $x->{_e} = $MBI->_new( $dat );
2352 my $z = $MBI->_new($zeros);