Lines Matching full:masm
3 # Ascetic x86_64 AT&T to MASM/NASM assembler translator by <appro>.
5 # Why AT&T to MASM and not vice versa? Several reasons. Because AT&T
15 # code from AT&T format to MASM one. It's designed to convert just
76 my $masm=0;
87 elsif ($flavour eq "masm") { $gas=0; $elf=0; $masm=$masmref; $win64=1; $decor="\$L\$"; }
93 { $masm = $1 + $2*2**-16 + $4*2**-32; }
94 die "no assembler found on %PATH" if (!($nasm || $masm));
207 $self->{value} =~ s/0x([0-9a-f]+)/0$1h/ig if ($masm);
370 $self->{value} .= ":" if ($masm && $ret!~m/^\$/);
380 $func .= ":" if ($masm);
525 # non-gas case or nasm/masm
534 $v.=$masm>=$masmref ? "ALIGN(64)" : "PAGE";
567 $v.=" ALIGN(".($1 eq "p" ? 4 : 8).")" if ($masm>=$masmref);
570 $v.=$masm>=$masmref ? "ALIGN(8)" : "DWORD";
578 $self->{value} .= ":NEAR" if ($masm);
582 && do { $self->{value} = $masm?"PUBLIC":"global";
590 $self->{value}.=":\n" if($masm);
592 $self->{value}.="$current_function->{name}\tENDP" if($masm && $current_function->{name});
604 $var=~s/^0x([0-9a-f]+)/0$1h/ig if ($masm);
618 map(s/0x([0-9a-f]+)/0$1h/ig,@str) if ($masm);
781 } elsif ($masm) {
855 print "\n$current_segment\tENDS\n" if ($current_segment && $masm);
856 print "END\n" if ($masm);
