projects
/
oweals
/
openssl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Portability patch for HP MPE/iX. Submitted by Mark Bixby <mark_bixby@hp.com>
[oweals/openssl.git]
/
crypto
/
perlasm
/
x86ms.pl
diff --git
a/crypto/perlasm/x86ms.pl
b/crypto/perlasm/x86ms.pl
index b8b1909567ae7063dd6b5b317b288aa1c4223f89..206452341d1faf5c444be80d68282bb34f338d5d 100644
(file)
--- a/
crypto/perlasm/x86ms.pl
+++ b/
crypto/perlasm/x86ms.pl
@@
-51,6
+51,16
@@
sub main'DWP
&get_mem("DWORD",@_);
}
&get_mem("DWORD",@_);
}
+sub main'BC
+ {
+ return @_;
+ }
+
+sub main'DWC
+ {
+ return @_;
+ }
+
sub main'stack_push
{
local($num)=@_;
sub main'stack_push
{
local($num)=@_;
@@
-331,7
+341,14
@@
sub main'set_label
$label{$_[0]}="${label}${_[0]}";
$label++;
}
$label{$_[0]}="${label}${_[0]}";
$label++;
}
- push(@out,"$label{$_[0]}:\n");
+ if((defined $_[2]) && ($_[2] == 1))
+ {
+ push(@out,"$label{$_[0]}::\n");
+ }
+ else
+ {
+ push(@out,"$label{$_[0]}:\n");
+ }
}
sub main'data_word
}
sub main'data_word