1 #!/usr/local/bin/perl 2 # x86 assember 3 4 sub bn_div_words 5 { 6 local($name)=@_; 7 8 &function_begin($name,""); 9 &mov("edx",&wparam(0)); # 10 &mov("eax",&wparam(1)); # 11 &mov("ebx",&wparam(2)); # 12 &div("ebx"); 13 &function_end($name); 14 } 15 1; 16