Lines Matching refs: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
80 my $masm=0;
91 elsif ($flavour eq "masm") { $gas=0; $elf=0; $masm=$masmref; $win64=1; $decor="\$L\$"; }
97 { $masm = $1 + $2*2**-16 + $4*2**-32; }
98 die "no assembler found on %PATH" if (!($nasm || $masm));
207 $self->{value} =~ s/0x([0-9a-f]+)/0$1h/ig if ($masm);
366 $self->{value} .= ":" if ($masm && $ret!~m/^\$/);
376 $func .= ":" if ($masm);
515 # non-gas case or nasm/masm
524 $v.=$masm>=$masmref ? "ALIGN(64)" : "PAGE";
555 $v.=" ALIGN(".($1 eq "p" ? 4 : 8).")" if ($masm>=$masmref);
563 $self->{value} .= ":NEAR" if ($masm);
567 && do { $self->{value} = $masm?"PUBLIC":"global";
575 $self->{value}.=":\n" if($masm);
577 $self->{value}.="$current_function->{name}\tENDP" if($masm);
589 $var=~s/^0x([0-9a-f]+)/0$1h/ig if ($masm);
603 map(s/0x([0-9a-f]+)/0$1h/ig,@str) if ($masm);
629 } elsif ($masm) {
688 print "\n$current_segment\tENDS\n" if ($current_segment && $masm);
689 print "END\n" if ($masm);
