Lines Matching defs:LIST
18 sub LIST () { 1 }
106 for my $context (qw(SCALAR LIST)) {
121 if ($context eq 'LIST' && $scalar_only{$package}) {
138 $caches{SCALAR} = $caches{LIST};
140 $caches{LIST} = $caches{SCALAR};
146 foreach $context (qw(SCALAR LIST)) {
164 L => $caches{LIST},
185 if ($context eq 'LIST' && $scalar_only{$module}) {
225 my $context = (wantarray() ? LIST : SCALAR);
231 } elsif ($context == LIST) {
234 croak "Internal error \#41; context was neither LIST nor SCALAR\n";
256 } elsif ($context == LIST) {
273 croak "Internal error \#42; context was neither LIST nor SCALAR\n";
989 =head1 MAILING LIST