Lines Matching full:globals
102 my %globals;
241 $self->{label} =~ s/([_a-z][_a-z0-9]*)/$globals{$1} or $1/gei;
350 my $func = ($globals{$self->{value}} or $self->{value}) . ":";
409 $self->{value} =~ s/([_a-z][_a-z0-9]*)/$globals{$1} or $1/gei;
453 && do { $globals{$line} = $prefix . $line;
454 $line = $globals{$line} if ($prefix);
463 $current_function->{scope} = defined($globals{$sym})?"PUBLIC":"PRIVATE";
467 $current_function->{scope} = defined($globals{$sym})?"PUBLIC":"PRIVATE";
480 && do { $line =~ s/([_a-z][_a-z0-9]*)/$globals{$1} or $1/gei;
493 $self->{value} = ".def\t" . ($globals{$1} or $1) . ";\t" .
494 (defined($globals{$1})?".scl 2;":".scl 3;") .
