Home
last modified time | relevance | path

Searched refs:AUTOLOAD (Results 1 – 25 of 99) sorted by relevance

1234

/openbsd/src/gnu/usr.bin/perl/cpan/NEXT/t/
Dnext.t16 our $AUTOLOAD;
17 sub B::AUTOLOAD { return ( 9, $_[0]->NEXT::AUTOLOAD() )
18 if $AUTOLOAD =~ /.*(missing_method|secondary)/ }
27 sub D::AUTOLOAD { return ( 8, $_[0]->NEXT::AUTOLOAD() ) }
35 sub E::AUTOLOAD { return ( 10, $_[0]->NEXT::AUTOLOAD() )
36 if $AUTOLOAD =~ /.*(missing_method|secondary)/ }
41 sub F::AUTOLOAD { return ( 11 ) if $AUTOLOAD =~ /.*(missing_method|secondary)/ }
46 sub G::AUTOLOAD { print "not "; return }
64 # TEST AUTOLOAD REDISPATCH (ok 8..11)
72 # AUTOLOAD'ED METHOD CAN'T REDISPATCH TO NAMED METHOD (ok 13)
[all …]
/openbsd/src/gnu/usr.bin/perl/ext/XS-APItest/t/
Dautoload.t20 *AUTOLOAD = *XS::APItest::AutoLoader::AUTOLOADp;
23 is prototype \&AUTOLOAD, '*$', 'prototype is unchanged';
26 is prototype \&AUTOLOAD, '*$', 'proto unchanged after embedded-null call';
29 is prototype \&AUTOLOAD, '*$', 'prototype is unchanged after Unicode call';
40 *a = \&AUTOLOAD;
62 *a = \&AUTOLOAD;
88 our $AUTOLOAD;
90 Test::More::ok(defined $AUTOLOAD);
91 return 1 if not defined $AUTOLOAD;
92 $main::the_method = $AUTOLOAD;
Dsvsetsv.t16 *AUTOLOAD = \&XS::APItest::AutoLoader::AUTOLOADp;
17 foo(\1); sv_set_deref(\&AUTOLOAD, '$', 0);
18 is prototype(\&AUTOLOAD), '$', 'sv_setsv(cv,...) sets prototype';
19 foo(\1); sv_set_deref(\&AUTOLOAD, '$', 1);
20 is prototype(\&AUTOLOAD), '$', 'sv_setpv(cv,...) sets prototype';
21 foo(\1); sv_set_deref(\&AUTOLOAD, '$', 2);
22 is prototype(\&AUTOLOAD), '$', 'sv_setpvn(cv,...) sets prototype';
Dgv_autoload4.t14 our $AUTOLOAD;
16 is $subname, $AUTOLOAD, $message;
51 our $AUTOLOAD;
53 ::is $subname, $AUTOLOAD, $message;
Dgv_fetchmeth_autoload.t23 local *AUTOLOAD = sub { 1 };
36 local *AUTOLOAD = sub { 1 };
69 local *AUTOLOAD = sub { 1 };
/openbsd/src/gnu/usr.bin/perl/dist/SelfLoader/lib/
DSelfLoader.pm56 our $AUTOLOAD;
57 print STDERR "SelfLoader::AUTOLOAD for $AUTOLOAD\n" if DEBUG;
58 my $SL_code = $Cache{$AUTOLOAD};
63 $AUTOLOAD =~ m/^(.*)::/;
65 $SL_code = $Cache{$AUTOLOAD};
66 $SL_code = "sub $AUTOLOAD { }"
67 if (!$SL_code and $AUTOLOAD =~ m/::DESTROY$/);
68 croak "Undefined subroutine $AUTOLOAD" unless $SL_code;
81 defined(&$AUTOLOAD) || die "SelfLoader inconsistency error";
82 delete $Cache{$AUTOLOAD};
[all …]
/openbsd/src/gnu/usr.bin/perl/t/op/
Dmethod.t150 BEGIN { *BB::e = \&C::e } # Shouldn't prevent AUTOLOAD in original pkg
157 sub BB::AUTOLOAD {
159 my $method = $BB::AUTOLOAD;
164 sub C::AUTOLOAD {
166 my $method = $C::AUTOLOAD;
188 *BB::AUTOLOAD = sub {
191 my $method = $::AUTOLOAD;
193 *$::AUTOLOAD = sub { "new B: In $method, $c" };
194 goto &$::AUTOLOAD;
296 sub AUTOLOAD {
[all …]
/openbsd/src/gnu/usr.bin/perl/lib/
Dutf8.pm9 our $AUTOLOAD;
20 goto &$AUTOLOAD if defined &$AUTOLOAD;
22 Carp::croak("Undefined subroutine $AUTOLOAD called");
/openbsd/src/gnu/usr.bin/perl/cpan/IPC-SysV/lib/IPC/
DSysV.pm14 use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $VERSION $AUTOLOAD);
67 my $constname = $AUTOLOAD;
77 *$AUTOLOAD = sub { $val };
79 goto &$AUTOLOAD;
/openbsd/src/gnu/usr.bin/perl/dist/Time-HiRes/
DHiRes.pm57 our $AUTOLOAD;
60 ($constname = $AUTOLOAD) =~ s/.*:://;
71 *$AUTOLOAD = sub { $val };
73 goto &$AUTOLOAD;
/openbsd/src/gnu/usr.bin/perl/cpan/Compress-Raw-Bzip2/lib/Compress/Raw/
DBzip2.pm12 our ($VERSION, $XS_VERSION, @ISA, @EXPORT, $AUTOLOAD);
46 ($constname = $AUTOLOAD) =~ s/.*:://;
50 *{$AUTOLOAD} = sub { $val };
51 goto &{$AUTOLOAD};
/openbsd/src/gnu/usr.bin/perl/ext/VMS-Stdio/
DStdio.pm31 my($constname) = $AUTOLOAD;
36 *$AUTOLOAD = sub { $val; }
41 *$AUTOLOAD = eval "sub { shift->IO::File::$constname(\@_) }";
44 goto &$AUTOLOAD;
/openbsd/src/gnu/usr.bin/perl/cpan/Term-ANSIColor/lib/Term/
DANSIColor.pm38 our $AUTOLOAD;
266 my ($sub, $attr) = $AUTOLOAD =~ m{
273 croak("undefined subroutine &$AUTOLOAD called");
283 $AUTOLOAD = $sub;
299 sub $AUTOLOAD {
324 goto &$AUTOLOAD;
/openbsd/src/gnu/usr.bin/perl/cpan/Scalar-List-Utils/t/
Dreftype.t53 sub AUTOLOAD {
54 our $AUTOLOAD;
55 warn "$AUTOLOAD called";
Drefaddr.t77 sub AUTOLOAD {
78 our $AUTOLOAD;
79 warn "$AUTOLOAD called";
/openbsd/src/gnu/usr.bin/perl/dist/Attribute-Handlers/lib/Attribute/
DHandlers.pm6 our $AUTOLOAD;
163 return if $AUTOLOAD =~ /::DESTROY$/;
164 my ($class) = $AUTOLOAD =~ m/(.*)::/g;
165 $AUTOLOAD =~ m/_ATTR_(.*?)_(.*)/ or
166 croak "Can't locate class method '$AUTOLOAD' via package '$class'";
/openbsd/src/gnu/usr.bin/perl/cpan/AutoLoader/lib/
DAutoLoader.pm6 our($VERSION, $AUTOLOAD);
22 my $sub = $AUTOLOAD;
147 *{ $callpkg . '::AUTOLOAD' } = \&AUTOLOAD;
/openbsd/src/gnu/usr.bin/perl/cpan/IO-Zlib/
DZlib.pm295 our $AUTOLOAD;
595 $AUTOLOAD =~ s/.*:://;
596 $AUTOLOAD =~ tr/a-z/A-Z/;
598 return tied(*{$self})->$AUTOLOAD(@_);
/openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/EventFacet/
DMeta.pm8 use vars qw/$AUTOLOAD/;
38 my $name = $AUTOLOAD;
/openbsd/src/gnu/usr.bin/perl/ext/B/t/
Dconcise.t200 our $AUTOLOAD = 'garbage';
201 sub AUTOLOAD { print "# in AUTOLOAD body: $AUTOLOAD\n" }
211 ($res,$err) = render('-basic', \&Bar::AUTOLOAD);
212 like ($res, qr/in AUTOLOAD body: /, "found body of Bar::AUTOLOAD");
362 like($out, qr/Config::AUTOLOAD exists in stash, but has no START/,
369 like($out, qr/Config::AUTOLOAD exists in stash, but has no START/,
/openbsd/src/gnu/usr.bin/perl/os2/OS2/OS2-REXX/DLL/
DDLL.pm81 $AUTOLOAD =~ /^OS2::DLL::dll::.+::(.+)$/
82 or confess("Undefined subroutine &$AUTOLOAD called");
86 goto &$AUTOLOAD;
/openbsd/src/gnu/usr.bin/perl/cpan/CPAN/t/
D02nox.t31 is( \&CPAN::Nox::AUTOLOAD, \&CPAN::AUTOLOAD, 'AUTOLOAD should be aliased' );
/openbsd/src/gnu/usr.bin/perl/t/comp/
Dour.t30 sub AUTOLOAD {
31 for ($AUTOLOAD =~ /TieAll::(.*)/) {
/openbsd/src/gnu/usr.bin/perl/cpan/Encode/lib/Encode/
DEncoder.pm13 our $AUTOLOAD;
79 my $myname = $AUTOLOAD;
/openbsd/src/gnu/usr.bin/perl/cpan/AutoLoader/t/
D01AutoLoader.t140 ::ok( ! defined &AUTOLOAD, 'AutoLoader should not export AUTOLOAD by default' );
151 sub AUTOLOAD { 'i am here' } subroutine
156 ::is( Baz->AUTOLOAD(), 'i am here', '... but not non-imported AUTOLOAD()' );

1234