OLD | NEW |
1 #!/usr/local/bin/perl | 1 #!/usr/local/bin/perl |
2 | 2 |
3 # Normal is the | 3 # Normal is the |
4 # ripemd160_block_asm_data_order(RIPEMD160_CTX *c, ULONG *X,int blocks); | 4 # ripemd160_block_asm_data_order(RIPEMD160_CTX *c, ULONG *X,int blocks); |
5 | 5 |
6 $normal=0; | 6 $normal=0; |
7 | 7 |
8 push(@INC,"perlasm","../../perlasm"); | 8 $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1; |
| 9 push(@INC,"${dir}","${dir}../../perlasm"); |
9 require "x86asm.pl"; | 10 require "x86asm.pl"; |
10 | 11 |
11 &asm_init($ARGV[0],$0); | 12 &asm_init($ARGV[0],$0); |
12 | 13 |
13 $A="ecx"; | 14 $A="ecx"; |
14 $B="esi"; | 15 $B="esi"; |
15 $C="edi"; | 16 $C="edi"; |
16 $D="ebx"; | 17 $D="ebx"; |
17 $E="ebp"; | 18 $E="ebp"; |
18 $tmp1="eax"; | 19 $tmp1="eax"; |
(...skipping 562 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
581 &stack_pop(16+5+6); | 582 &stack_pop(16+5+6); |
582 | 583 |
583 &pop("ebx"); | 584 &pop("ebx"); |
584 &pop("ebp"); | 585 &pop("ebp"); |
585 &pop("edi"); | 586 &pop("edi"); |
586 &pop("esi"); | 587 &pop("esi"); |
587 &ret(); | 588 &ret(); |
588 &function_end_B($name); | 589 &function_end_B($name); |
589 } | 590 } |
590 | 591 |
OLD | NEW |