Searched refs:overload (Results 1 - 25 of 43) sorted by relevance
12
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/t/ |
H A D | HAS_OVERLOAD.pm | 3 use overload
|
H A D | overload.t | 32 use overload 64 use overload
|
H A D | just_plain_nasty.t | 50 use overload 78 headit("circular overload 1 - freeze"); 81 headit("circular overload 1 - thaw"); 83 ok(ref($oh_dear), "ARRAY", "dclone - circular overload"); 94 headit("circular overload, after closure - freeze"); 99 headit("circular overload, after closure - thaw"); 106 headit("closure freeze AFTER circular overload"); 110 headit("circular thaw AFTER circular overload"); 117 headit("closure freeze BETWEEN circular overload"); 121 headit("circular thaw BETWEEN circular overload"); [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigFloat/ |
H A D | Trace.pm | 17 use overload; # inherit overload from BigFloat 52 overload::constant float => sub { $self->new(shift); };
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Data/Dumper/t/ |
H A D | overload.t | 21 use overload '""' => 'as_string';
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/ |
H A D | overload.t | 9 use overload ( 118 eval q[ package Oscalar; use overload ('++' => sub { $ {$_[0]}++;$_[0] } ) ]; 145 eval q[package Oscalar; use overload ('++' => sub { $ {$_[0]} += 2; $_[0] } ) ]; 180 eval q[ package Oscalar; use overload ('=' => sub {$main::copies++; 226 eval q[package Oscalar; use overload ('+=' => sub {$ {$_[0]} += 3*$_[1]; 263 use overload ('x' => sub {new Oscalar ( $_[2] ? "_.$_[1]._" x $ {$_[0]} 271 use overload ('.' => sub {new Oscalar ( $_[2] ? 293 eval "package Oscalar; no overload '.'"; 313 eval "package Oscalar; sub comple; use overload '~' => 'comple'"; 338 eval "package Oscalar; sub rshft; use overload '>>' [all...] |
H A D | overload.pm | 1 package overload; package 5 $overload::hint_bits = 0x20000; # HINT_LOCALIZE_HH 35 $package->overload::OVERLOAD(@_); 140 warnings::warnif ("Odd number of arguments for overload::constant"); 156 $^H |= $constants{$_[0]} | $overload::hint_bits; 177 overload - Package for overloading perl operations 183 use overload 193 if (overload::Overloaded $b) {...} 195 $strval = overload::StrVal $b; 204 use overload [all...] |
H A D | dumpvar.pl | 61 $_ = &{'overload::StrVal'}($_) 63 and %overload:: and defined &{'overload::StrVal'}; 138 $val = &{'overload::StrVal'}($v) 139 if %overload:: and defined &{'overload::StrVal'};
|
H A D | bigint.pm | 11 use overload; 182 overload::constant float => sub { Math::BigInt->new( _constant(shift) ); }; 339 See the documentation about the copy constructor and C<=> in overload, as
|
H A D | Dumpvalue.t | 272 use overload '"' => sub { "overloaded!" };
|
H A D | Dumpvalue.pm | 94 $_ = &{'overload::StrVal'}($_) 96 and %overload:: and defined &{'overload::StrVal'}; 166 $val = &{'overload::StrVal'}($v) 167 if %overload:: and defined &{'overload::StrVal'};
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/lib/Math/BigFloat/ |
H A D | Subclass.pm | 17 use overload; # inherit overload from BigInt
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Tie/ |
H A D | RefHash.pm | 77 require overload; # to support objects with overloaded "" 92 my $kstr = overload::StrVal($k); 108 $s->[0]{overload::StrVal($k)} = [$k, $v]; 118 (ref $k) ? delete($s->[0]{overload::StrVal($k)}) : delete($s->[1]{$k}); 123 (ref $k) ? exists($s->[0]{overload::StrVal($k)}) : exists($s->[1]{$k});
|
H A D | RefHash.t | 29 use overload '""' => sub { ${$_[0]} . reverse ${$_[0]} };
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/List/Util/t/ |
H A D | refaddr.t | 43 use overload '0+' => sub { 10 },
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/ |
H A D | Trace.pm | 17 use overload; # inherit overload from BigInt
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/BigInt/t/ |
H A D | calling.t | 47 use overload; 54 use overload;
|
H A D | upgradef.t | 41 use overload;
|
H A D | upgrade.inc | 26 use overload 27 # customized overload for sub, since original does not use swap there 134 # overload via x= 137 # overload via x
|
H A D | bigintpm.inc | 16 use overload 17 # customized overload for sub, since original does not use swap there 112 # overload via x= 115 # overload via x 294 # object with stringify overload for this. see Math::String tests as example
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/lib/Math/BigInt/ |
H A D | Subclass.pm | 20 use overload; # inherit overload from BigInt
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Carp/ |
H A D | Heavy.pm | 50 $arg = defined($overload::VERSION) ? overload::StrVal($arg) : "$arg";
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/op/ |
H A D | bless.t | 122 use overload '""' => sub { "C4" };
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/t/lib/Math/BigRat/ |
H A D | Test.pm | 15 use overload; # inherit overload from BigRat
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/I18N/ |
H A D | Collate.pm | 71 # (my first version did overload all of lt gt eq le ge cmp) 95 # 3) due to cmp and overload magic, lt le eq ge gt work also 122 use overload qw(
|
Completed in 282 milliseconds
12