Lines Matching refs:addr
46 { my($size,$addr,$reg1,$reg2,$idx)=@_;
53 $addr =~ s/^\s+//;
55 $addr =~ s/^([^\+\-0-9][^\+\-]*)/&::islabel($1) or "$nmdecor$1"/ige;
57 $addr="($addr)" if ($addr =~ /^.+[\-\+].+$/);
59 if (($addr ne "") && ($addr ne 0))
60 { if ($addr !~ /^-/) { $ret .= "$addr"; }
61 else { $post=$addr; }
74 $ret =~ s/\+\]/]/; # in case $addr was the only argument