Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
OpenHarmony
Third Party Openssl
提交
0c34556c
T
Third Party Openssl
项目概览
OpenHarmony
/
Third Party Openssl
大约 1 年 前同步成功
通知
9
Star
18
Fork
1
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
T
Third Party Openssl
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
0c34556c
编写于
12月 05, 2000
作者:
U
Ulf Möller
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
looks like it works now
上级
b50118ca
变更
1
隐藏空白更改
内联
并排
Showing
1 changed file
with
4 addition
and
4 deletion
+4
-4
crypto/perlasm/x86unix.pl
crypto/perlasm/x86unix.pl
+4
-4
未找到文件。
crypto/perlasm/x86unix.pl
浏览文件 @
0c34556c
...
...
@@ -4,6 +4,7 @@ package x86unix;
$label
=
"
L000
";
$const
=
"";
$constl
=
0
;
$align
=
(
$main
'
aout)?"4":"16";
$under=($main
'
aout
)?"
_
":"";
...
...
@@ -484,8 +485,8 @@ sub main'putx
&main
'
push($_[0]);
&main
'
push
('
$Lstring
'
.
++
$constl
);
&main
'
call(
'
printf
'
);
$stack-=8;
&main
'
add
("
esp
",
8
);
$stack
-=
8
;
&popvars
();
$const
.=
"
Lstring
$constl
:
\n\t
.string
\"\
%X
\"\n
";
...
...
@@ -497,10 +498,9 @@ sub main'printf
&pushvars
();
for
(
$i
=
@
_
-
1
;
$i
>=
0
;
$i
--
)
{
$constl
++
;
if
(
$i
==
0
)
# change this to support %s format strings
{
&main
'
push(
'
$Lstring
'
. $constl);
&main
'
push(
'
$Lstring
'
.
++
$constl);
$const .= "Lstring$constl:\n\t.string \"@_[$i]\"\n";
}
else
...
...
@@ -517,8 +517,8 @@ sub main'printf
}
&main
'
call
('
printf
');
$stack
-=
4
*@_
;
&popvars
();
&main
'
add("esp",4*@_);
&popvars();
}
sub pushvars
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录