diff options
author | Andy Polyakov <appro@openssl.org> | 2008-07-15 13:16:42 +0000 |
---|---|---|
committer | Andy Polyakov <appro@openssl.org> | 2008-07-15 13:16:42 +0000 |
commit | 9960bdc6fa28b75f2e9935fcdad07e5d9bc50732 (patch) | |
tree | 4f9f0ed70ca36bdd9735394e722c1ae5cb65ff84 | |
parent | 23dcb447ffbcdc252622a41dd1b8629f2df6b467 (diff) |
x86masm.pl cosmetics.
-rw-r--r-- | crypto/perlasm/x86masm.pl | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/crypto/perlasm/x86masm.pl b/crypto/perlasm/x86masm.pl index 33ceeb5ab4..94eee5a76d 100644 --- a/crypto/perlasm/x86masm.pl +++ b/crypto/perlasm/x86masm.pl @@ -71,10 +71,17 @@ sub ::DWC { "@_"; } sub ::file { my $tmp=<<___; TITLE $_[0].asm +IF \@Version LT 800 +ECHO MASM version 8.00 or later is strongly recommended. +ENDIF .486 .MODEL FLAT OPTION DOTNAME -.TEXT\$ SEGMENT PAGE 'CODE' +IF \@Version LT 800 +.text\$ SEGMENT PAGE 'CODE' +ELSE +.text\$ SEGMENT ALIGN(64) 'CODE' +ENDIF ___ push(@out,$tmp); } @@ -114,13 +121,13 @@ ___ grep {s/\.[3-7]86/$xmmheader/} @out; } - push(@out,".TEXT\$ ENDS\n"); + push(@out,".text\$ ENDS\n"); if (grep {/\b${nmdecor}OPENSSL_ia32cap_P\b/i} @out) { my $comm=<<___; -_DATA SEGMENT +.bss SEGMENT COMM ${nmdecor}OPENSSL_ia32cap_P:DWORD -_DATA ENDS +.bss ENDS ___ # comment out OPENSSL_ia32cap_P declarations grep {s/(^EXTERN\s+${nmdecor}OPENSSL_ia32cap_P)/\;$1/} @out; |