Lines Matching full:globals
97 my %globals;
236 $self->{label} =~ s/([_a-z][_a-z0-9]*)/$globals{$1} or $1/gei;
356 my $func = ($globals{$self->{value}} or $self->{value}) . ":";
415 $self->{value} =~ s/([_a-z][_a-z0-9]*)/$globals{$1} or $1/gei;
459 && do { $globals{$line} = $prefix . $line;
460 $line = $globals{$line} if ($prefix);
469 $current_function->{scope} = defined($globals{$sym})?"PUBLIC":"PRIVATE";
473 $current_function->{scope} = defined($globals{$sym})?"PUBLIC":"PRIVATE";
486 && do { $line =~ s/([_a-z][_a-z0-9]*)/$globals{$1} or $1/gei;
503 $self->{value} = ".def\t" . ($globals{$1} or $1) . ";\t" .
504 (defined($globals{$1})?".scl 2;":".scl 3;") .
