shithub: riscv

ref: 072c45d4633d5f03e3b79f9c60c3655a6d4a1149
dir: /sys/src/ape/lib/openssl/crypto/bn/asm/x86/div.pl/

View raw version 
#!/usr/local/bin/perl
# x86 assember

sub bn_div_words
	{
	local($name)=@_;

	&function_begin($name,"");
	&mov("edx",&wparam(0));	#
	&mov("eax",&wparam(1));	#
	&mov("ebx",&wparam(2));	#
	&div("ebx");
	&function_end($name);
	}
1;