Lines Matching full:addr
94 my($size,$addr,$reg1,$reg2,$idx)=@_;
103 $addr =~ s/^\s+//;
104 if ($addr =~ /^(.+)\+(.+)$/)
107 $addr="$under$2";
109 elsif ($addr =~ /^[_a-z][_a-z0-9]*$/i)
111 $addr="$under$addr";
114 if ($addr =~ /^.+\-.+$/) { $addr="($addr)"; }
118 if (($addr ne "") && ($addr ne 0))
120 if ($addr !~ /^-/)
121 { $ret.="${addr}+"; }
122 else { $post=$addr; }
135 $ret =~ s/\+\]/]/; # in case $addr was the only argument
