Lines Matching full:addr
91 local($size,$addr,$reg1,$reg2,$idx)=@_;
95 $addr =~ s/^\s+//;
96 if ($addr =~ /^(.+)\+(.+)$/)
99 $addr="_$2";
101 elsif ($addr =~ /^[_a-z][_a-z0-9]*$/i)
103 $addr="_$addr";
106 if ($addr =~ /^.+\-.+$/) { $addr="($addr)"; }
110 if (($addr ne "") && ($addr ne 0))
112 if ($addr !~ /^-/)
113 { $ret.=$addr; }
114 else { $post=$addr; }
127 $ret =~ s/\[\]//; # in case $addr was the only argument
