OLD | NEW |
| (Empty) |
1 #!/usr/local/bin/perl | |
2 | |
3 push(@INC,"perlasm","../../perlasm"); | |
4 require "x86asm.pl"; | |
5 | |
6 require("x86/mul_add.pl"); | |
7 require("x86/mul.pl"); | |
8 require("x86/sqr.pl"); | |
9 require("x86/div.pl"); | |
10 require("x86/add.pl"); | |
11 require("x86/sub.pl"); | |
12 require("x86/comba.pl"); | |
13 | |
14 &asm_init($ARGV[0],$0); | |
15 | |
16 &bn_mul_add_words("bn_mul_add_words"); | |
17 &bn_mul_words("bn_mul_words"); | |
18 &bn_sqr_words("bn_sqr_words"); | |
19 &bn_div_words("bn_div_words"); | |
20 &bn_add_words("bn_add_words"); | |
21 &bn_sub_words("bn_sub_words"); | |
22 &bn_mul_comba("bn_mul_comba8",8); | |
23 &bn_mul_comba("bn_mul_comba4",4); | |
24 &bn_sqr_comba("bn_sqr_comba8",8); | |
25 &bn_sqr_comba("bn_sqr_comba4",4); | |
26 | |
27 &asm_finish(); | |
28 | |
OLD | NEW |