Lines Matching refs:str
955 /\.byte/ && do { my @str=split(/,\s*/,$$line);
956 map(s/(0b[0-1]+)/oct($1)/eig,@str);
957 map(s/0x([0-9a-f]+)/0$1h/ig,@str) if ($masm);
958 while ($#str>15) {
960 .join(",",@str[0..15])."\n";
961 foreach (0..15) { shift @str; }
964 .join(",",@str) if (@str);
967 /\.comm/ && do { my @str=split(/,\s*/,$$line);
970 $v.="common $prefix@str[0] @str[1]";
975 $v.="COMM @str[0]:DWORD:".@str[1]/4;