Home | History | Annotate | Download | only in perlasm

Lines Matching refs:flavour

5 my $flavour = shift;
10 my $dotinlocallabels=($flavour=~/linux/)?1:0;
23 SWITCH: for ($flavour) {
54 ($flavour =~ /aix/) ? ".csect" : ".text";
59 if ($flavour =~ /osx/)
61 $arch = ($flavour=~/64/) ? "ppc970-64" : "ppc970" if ($arch eq "any");
81 ($flavour =~ /linux.*32/) ?
89 } if ($flavour!~/linux/);
93 ($flavour =~ /linux/) ? # GNU as doesn't allow most recent hints
100 ($flavour =~ /linux/) ? # GNU as doesn't allow most recent hints
107 ($flavour =~ /linux/) ? # GNU as doesn't allow most recent hints
143 $line =~ s|\bc?[rf]([0-9]+)\b|$1|g if ($c ne "." and $flavour !~ /osx/);