Searched refs:symtable (Results 1 - 2 of 2) sorted by relevance
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/ |
| H A D | B.pm | 148 my %symtable;
151 %symtable = ();
157 $symtable{sprintf("sym_%x", $$obj)} = $value;
162 return $symtable{sprintf("sym_%x", $$obj)};
242 my ($class, $section, $symtable, $default) = @_;
244 my $obj = bless [-1, $section, $symtable, $default], $class;
272 sub symtable { subroutine
285 my $sym = $section->symtable || {};
|
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/B/ |
| H A D | C.pm | 38 my $sym = $section->symtable || {};
113 my $sym = $section->symtable || {};
185 my %symtable;
245 $symtable{$sym} = $value;
250 return $symtable{sprintf("s\\_%x", $$obj)};
258 $value = $symtable{$sym};
1742 while (($sym, $val) = each %symtable) {
1924 warn "done main optree, walking symtable for extras\n" if $debug_cv;
1994 $$sectref = new B::C::Section $name, \%symtable, 0;
1996 $init = new B::C::InitSection 'init', \%symtable,
[all...] |
Completed in 26 milliseconds