Lines Matching refs:line
87 my $ret = ($flavour =~ /aix64-as/) ? "" : ".p2align $line";
116 my $line = join(",",@_);
117 if ($line =~ /^"(.*)"$/)
397 while($line=<>) {
399 $line =~ s|[#!;].*$||; # get rid of asm-style comments...
400 $line =~ s|/\*.*\*/||; # ... and C-style comments...
401 $line =~ s|^\s+||; # ... and skip whitespaces in beginning...
402 $line =~ s|\s+$||; # ... and at the end
405 $line =~ s|\.L(\w+)|L$1|g; # common denominator for Locallabel
406 $line =~ s|\bL(\w+)|\.L$1|g if ($dotinlocallabels);
410 $line =~ s|(^[\.\w]+)\:\s*||;
424 $line =~ s|^\s*(\.?)(\w+)([\.\+\-]?)\s*||;
429 $line =~ s/\b(c?[rf]|v|vs)([0-9]+)\b/$2/g if ($c ne "." and $flavour !~ /osx/);
430 if (ref($opcode) eq 'CODE') { $line = &$opcode($f,split(/,\s*/,$line)); }
431 elsif ($mnemonic) { $line = $c.$mnemonic.$f."\t".$line; }
434 print $line if ($line);
