Searched defs:numify (Results 1 - 5 of 5) sorted by relevance

/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/
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
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 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...]
/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

Completed in 44 milliseconds