Searched refs:_rsft (Results 1 – 7 of 7) sorted by relevance
| /openbsd/src/gnu/usr.bin/perl/cpan/Math-BigInt-FastCalc/t/ |
| D | bigintfc.t | 228 # _lsft, _rsft 247 is($LIB->_str($LIB->_rsft($x, $y, 10)), 1, 248 qq|$LIB->_str($LIB->_rsft(\$x, \$y, 10)) = 1|); 252 is($LIB->_str($LIB->_rsft($x, $y, 10)), 20, 253 qq|$LIB->_str($LIB->_rsft(\$x, \$y, 10)) = 20|); 257 is($LIB->_str($LIB->_rsft($x, $y, 2)), 256 >> 4, 258 qq|$LIB->_str($LIB->_rsft(\$x, \$y, 2)) = 256 >> 4|); 262 is($LIB->_str($LIB->_rsft($x, $y, 10)), 0, 263 qq|$LIB->_str($LIB->_rsft(\$x, \$y, 10)) = 0|);
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Math-BigInt/t/ |
| D | bigintc.t | 228 # _lsft, _rsft 247 is($LIB->_str($LIB->_rsft($x, $y, 10)), 1, 248 qq|$LIB->_str($LIB->_rsft(\$x, \$y, 10)) = 1|); 252 is($LIB->_str($LIB->_rsft($x, $y, 10)), 20, 253 qq|$LIB->_str($LIB->_rsft(\$x, \$y, 10)) = 20|); 257 is($LIB->_str($LIB->_rsft($x, $y, 2)), 256 >> 4, 258 qq|$LIB->_str($LIB->_rsft(\$x, \$y, 2)) = 256 >> 4|); 262 is($LIB->_str($LIB->_rsft($x, $y, 10)), 0, 263 qq|$LIB->_str($LIB->_rsft(\$x, \$y, 10)) = 0|);
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Math-BigInt/t/Math/BigInt/ |
| D | Scalar.pm | 90 sub _rsft { subroutine
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Math-BigInt/lib/Math/BigInt/ |
| D | Lib.pm | 105 return $class -> _rsft($x, $y); 528 sub _rsft { 664 $h = $class -> _rsft($class -> _copy($x), $log2n, $two);
|
| D | Calc.pm | 1216 sub _rsft { subroutine
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Math-BigInt/lib/Math/ |
| D | BigFloat.pm | 1340 $y = $LIB->_rsft($y, $x->{_e}, 10); 1729 $x->{_m} = $LIB->_rsft($x->{_m}, $z, 10); 3723 : $LIB -> _rsft($x->{_m}, $na, 10); 4495 $x->{_m} = $LIB->_rsft($x->{_m}, $x->{_e}, 10); 4518 $x->{_m} = $LIB->_rsft($x->{_m}, $x->{_e}, 10); 4545 $x->{_m} = $LIB->_rsft($x->{_m}, $x->{_e}, 10); # remove frac part 4855 $int->{_m} = $LIB -> _rsft($int->{_m}, $int->{_e}, 10);
|
| D | BigInt.pm | 4000 $x -> {value} = $LIB -> _rsft($x -> {value}, $y -> {value}, $b); 4115 $x -> {value} = $LIB -> _rsft($x -> {value}, $y -> {value}, 2); 4726 = $LIB -> _rsft($mant -> {value}, $LIB -> _new($nzeros), 10) 6249 $sig_lib = $LIB -> _rsft($sig_lib, $n, 10);
|