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