Lines Matching refs:mwerks
9 $drdecor=$::mwerks?".":""; # directive decoration
17 if (!$::mwerks)
41 $ret .= " PTR" if ($::mwerks);
74 sub ::BC { (($::mwerks)?"":"BYTE ")."@_"; }
75 sub ::DWC { (($::mwerks)?"":"DWORD ")."@_"; }
78 { if ($::mwerks) { push(@out,".section\t.text,64\n"); }
99 $begin =~ s/^\@/./ if ($::mwerks); # the torture never stops
140 { push(@out,(($::mwerks)?".byte\t":"db\t").join(',',@_)."\n"); }
142 { push(@out,(($::mwerks)?".word\t":"dw\t").join(',',@_)."\n"); }
144 { push(@out,(($::mwerks)?".long\t":"dd\t").join(',',@_)."\n"); }
166 { if ($mwerks) { push(@out,".section\t.data,4\n"); }
