提交 8ed11a81 编写于 作者: A Andy Polyakov

[aes|cmll]t4-sparcv9.pl: unify argument handling.

上级 38049c2b
...@@ -68,10 +68,7 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1; ...@@ -68,10 +68,7 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
push(@INC,"${dir}","${dir}../../perlasm"); push(@INC,"${dir}","${dir}../../perlasm");
require "sparcv9_modes.pl"; require "sparcv9_modes.pl";
$bits=32; &asm_init(@ARGV);
for (@ARGV) { $bits=64 if (/\-m64/ || /\-xarch\=v9/); }
if ($bits==64) { $::bias=2047; $::frame=192; $::size_t_cc="%xcc"; }
else { $::bias=0; $::frame=112; $::size_t_cc="%icc"; }
$::evp=1; # if $evp is set to 0, script generates module with $::evp=1; # if $evp is set to 0, script generates module with
# AES_[en|de]crypt, AES_set_[en|de]crypt_key and AES_cbc_encrypt entry # AES_[en|de]crypt, AES_set_[en|de]crypt_key and AES_cbc_encrypt entry
......
...@@ -46,10 +46,7 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1; ...@@ -46,10 +46,7 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
push(@INC,"${dir}","${dir}../../perlasm"); push(@INC,"${dir}","${dir}../../perlasm");
require "sparcv9_modes.pl"; require "sparcv9_modes.pl";
$bits=32; &asm_init(@ARGV);
for (@ARGV) { $bits=64 if (/\-m64/ || /\-xarch\=v9/); }
if ($bits==64) { $::bias=2047; $::frame=192; $::size_t_cc="%xcc"; }
else { $::bias=0; $::frame=112; $::size_t_cc="%icc"; }
$::evp=1; # if $evp is set to 0, script generates module with $::evp=1; # if $evp is set to 0, script generates module with
# Camellia_[en|de]crypt, Camellia_set_key and Camellia_cbc_encrypt # Camellia_[en|de]crypt, Camellia_set_key and Camellia_cbc_encrypt
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册