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

crypto/aes/asm/aest4-sparcv9.pl

@@ -68,10 +68,7 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
 push(@INC,"${dir}","${dir}../../perlasm");
 require "sparcv9_modes.pl";
 
-$bits=32;
-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"; }
+&asm_init(@ARGV);
 
 $::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

crypto/camellia/asm/cmllt4-sparcv9.pl

@@ -46,10 +46,7 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
 push(@INC,"${dir}","${dir}../../perlasm");
 require "sparcv9_modes.pl";
 
-$bits=32;
-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"; }
+&asm_init(@ARGV);
 
 $::evp=1;	# if $evp is set to 0, script generates module with
 # Camellia_[en|de]crypt, Camellia_set_key and Camellia_cbc_encrypt