Searched refs:numify (Results 1 - 11 of 11) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigRat/t/
H A Dbigratpm.inc57 } elsif ($f =~ /^(length|numify)$/) {
279 &numify
H A Dbigrat.t223 # numify()
232 $x = $cr->new('33/8'); ok ($x->numify() * 1000, 4125);
233 $x = $cr->new('-33/8'); ok ($x->numify() * 1000, -4125);
234 $x = $cr->new('inf'); ok ($x->numify(), 'inf');
235 $x = $cr->new('-inf'); ok ($x->numify(), '-inf');
236 $x = $cr->new('NaN'); ok ($x->numify(), 'NaN');
238 $x = $cr->new('4/3'); ok ($x->numify(), 4/3);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A Doverload.t29 0+ numify) # Order of arguments unsignificant
38 sub numify { 0 + "${$_[0]}" } # Not needed, additional overhead subroutine
354 test (overload::Method($a, '0+') eq \&Oscalar::numify); # 106
355 test (overload::Method($aI,'0+') eq \&Oscalar::numify); # 107
1115 use overload (qw(0+ numify fallback 1));
1122 sub numify { ${$_[0]} } subroutine
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/lib/Math/BigRat/
H A DTest.pm98 sub numify subroutine
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/t/
H A Dbigfltpm.inc56 } elsif ($f =~ /^(numify|length|as_number|as_hex|as_bin)$/) {
210 # bug in bsstr()/numify() showed up in after-rounding in bdiv()
389 &numify
H A Dbigintpm.inc78 } elsif ($f =~ /^(numify|length|stringify|as_hex|as_bin)$/) {
528 # check numify
530 $x = $class->new($BASE-1); ok ($x->numify(),$BASE-1);
531 $x = $class->new(-($BASE-1)); ok ($x->numify(),-($BASE-1));
534 $x = $class->new($BASE); ok ($x->numify()+0,$BASE+0);
535 $x = $class->new(-$BASE); ok ($x->numify(),-$BASE);
537 ok($x->numify(),-($BASE*$BASE*1+$BASE*1+1));
1121 &numify
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/lib/Encode/
H A DEncoder.pm236 This module overloads two operators, stringify ("") and numify (0+).
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DBigInt.pm70 'cos' => sub { cos($_[0]->numify()) },
71 'sin' => sub { sin($_[0]->numify()) },
72 'exp' => sub { exp($_[0]->numify()) },
73 'atan2' => sub { atan2($_[0]->numify(),$_[1]) },
131 '0+' => sub { $_[0]->numify(); }
266 # have numify(), then hopefully it will have overloading for int() and
268 $a = $a->numify() if ref($a) && $a->can('numify');
322 # have numify(), then hopefully it will have overloading for int() and
324 $p = $p->numify() i
790 sub numify subroutine
[all...]
H A DBigRat.pm1163 sub numify subroutine
1171 return $x->{_n}->numify() if $x->{_d}->is_one();
1175 $neg * $x->{_n}->numify() / $x->{_d}->numify(); # return sign * N/D
H A DBigFloat.pm119 # avoid numify-calls by not using || on $wanted!
397 sub numify subroutine
456 # the numify somewhat limits our length, but makes it much faster
523 # the numify somewhat limits our length, but makes it much faster
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Opcode/
H A DSafe.pm120 &version::numify

Completed in 48 milliseconds