Home | History | Annotate | Download | only in perlasm

Lines Matching refs:label

52 #		lea		.Label-.(%rax),%rax
57 # lea .Label-.Lpic_point(%rcx),%rbp
167 $self->{label} = $1;
191 # in $self->{label}
193 $self->{label} =~ s/(?<![0-9a-f])(0[x0-9a-f]+)/oct($1)/egi;
194 $self->{label} =~ s/([0-9]+\s*[\*\/\%]\s*[0-9]+)/eval($1)/eg;
195 $self->{label} =~ s/([0-9]+)/$1<<32>>32/eg;
199 $self->{label},$self->{base},
202 sprintf "%s(%%%s)", $self->{label},$self->{base};
207 $self->{label} =~ s/\./\$/g;
208 $self->{label} =~ s/0x([0-9a-f]+)/0$1h/ig;
209 $self->{label} = "($self->{label})" if ($self->{label} =~ /[\*\+\-\/]/);
213 $self->{label},
217 sprintf "%s PTR %s",$szmap{$sz},$self->{label};
220 $self->{label},$self->{base};
260 { package label; # pick up labels, which end with :
442 undef $label;
448 if ($label=label->re(\$line)) { print $label->out(); }