155714Skris#!/usr/local/bin/perl 255714Skris 355714Skrispush(@INC,"perlasm","../../perlasm"); 455714Skrisrequire "x86asm.pl"; 555714Skris 655714Skrisrequire("x86/mul_add.pl"); 755714Skrisrequire("x86/mul.pl"); 855714Skrisrequire("x86/sqr.pl"); 955714Skrisrequire("x86/div.pl"); 1055714Skrisrequire("x86/add.pl"); 1155714Skrisrequire("x86/sub.pl"); 1255714Skrisrequire("x86/comba.pl"); 1355714Skris 1455714Skris&asm_init($ARGV[0],$0); 1555714Skris 1655714Skris&bn_mul_add_words("bn_mul_add_words"); 1755714Skris&bn_mul_words("bn_mul_words"); 1855714Skris&bn_sqr_words("bn_sqr_words"); 1955714Skris&bn_div_words("bn_div_words"); 2055714Skris&bn_add_words("bn_add_words"); 2155714Skris&bn_sub_words("bn_sub_words"); 2255714Skris&bn_mul_comba("bn_mul_comba8",8); 2355714Skris&bn_mul_comba("bn_mul_comba4",4); 2455714Skris&bn_sqr_comba("bn_sqr_comba8",8); 2555714Skris&bn_sqr_comba("bn_sqr_comba4",4); 2655714Skris 2755714Skris&asm_finish(); 2855714Skris 29