Lines Matching refs:globals
101 my %globals;
240 $self->{label} =~ s/([_a-z][_a-z0-9]*)/$globals{$1} or $1/gei;
349 my $func = ($globals{$self->{value}} or $self->{value}) . ":";
408 $self->{value} =~ s/([_a-z][_a-z0-9]*)/$globals{$1} or $1/gei;
452 && do { $globals{$line} = $prefix . $line;
453 $line = $globals{$line} if ($prefix);
462 $current_function->{scope} = defined($globals{$sym})?"PUBLIC":"PRIVATE";
466 $current_function->{scope} = defined($globals{$sym})?"PUBLIC":"PRIVATE";
479 && do { $line =~ s/([_a-z][_a-z0-9]*)/$globals{$1} or $1/gei;
492 $self->{value} = ".def\t" . ($globals{$1} or $1) . ";\t" .
493 (defined($globals{$1})?".scl 2;":".scl 3;") .