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