| /* i80386 __mpn_submul_1 -- Multiply a limb vector with a limb and subtract |
| the result from a second limb vector. |
| Copyright (C) 1992, 1994, 1997 Free Software Foundation, Inc. |
| This file is part of the GNU MP Library. |
| |
| The GNU MP Library is free software; you can redistribute it and/or modify |
| it under the terms of the GNU Library General Public License as published by |
| the Free Software Foundation; either version 2 of the License, or (at your |
| option) any later version. |
| |
| The GNU MP Library is distributed in the hope that it will be useful, but |
| WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY |
| or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public |
| License for more details. |
| |
| You should have received a copy of the GNU Library General Public License |
| along with the GNU MP Library; see the file COPYING.LIB. If not, write to |
| the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, |
| MA 02111-1307, USA. */ |
| |
| /* |
| INPUT PARAMETERS |
| res_ptr (sp + 4) |
| s1_ptr (sp + 8) |
| sizeP (sp + 12) |
| s2_limb (sp + 16) |
| */ |
| |
| #include "sysdep.h" |
| #include "asm-syntax.h" |
| |
| #define res_ptr edi |
| #define s1_ptr esi |
| #define sizeP ecx |
| #define s2_limb ebp |
| |
| TEXT |
| ALIGN (3) |
| GLOBL C_SYMBOL_NAME(__mpn_submul_1) |
| ASM_TYPE_DIRECTIVE(C_SYMBOL_NAME(__mpn_submul_1),@function) |
| C_SYMBOL_NAME(__mpn_submul_1:) |
| |
| INSN1(push,l ,R(edi)) |
| INSN1(push,l ,R(esi)) |
| INSN1(push,l ,R(ebx)) |
| INSN1(push,l ,R(ebp)) |
| |
| INSN2(mov,l ,R(res_ptr),MEM_DISP(esp,20)) |
| INSN2(mov,l ,R(s1_ptr),MEM_DISP(esp,24)) |
| INSN2(mov,l ,R(sizeP),MEM_DISP(esp,28)) |
| INSN2(mov,l ,R(s2_limb),MEM_DISP(esp,32)) |
| |
| INSN2(lea,l ,R(res_ptr),MEM_INDEX(res_ptr,sizeP,4)) |
| INSN2(lea,l ,R(s1_ptr),MEM_INDEX(s1_ptr,sizeP,4)) |
| INSN1(neg,l ,R(sizeP)) |
| INSN2(xor,l ,R(ebx),R(ebx)) |
| ALIGN (3) |
| L(oop): |
| INSN2(mov,l ,R(eax),MEM_INDEX(s1_ptr,sizeP,4)) |
| INSN1(mul,l ,R(s2_limb)) |
| INSN2(add,l ,R(eax),R(ebx)) |
| INSN2(adc,l ,R(edx),$0) |
| INSN2(sub,l ,MEM_INDEX(res_ptr,sizeP,4),R(eax)) |
| INSN2(adc,l ,R(edx),$0) |
| INSN2(mov,l ,R(ebx),R(edx)) |
| |
| INSN1(inc,l ,R(sizeP)) |
| INSN1(jnz, ,L(oop)) |
| INSN2(mov,l ,R(eax),R(ebx)) |
| |
| INSN1(pop,l ,R(ebp)) |
| INSN1(pop,l ,R(ebx)) |
| INSN1(pop,l ,R(esi)) |
| INSN1(pop,l ,R(edi)) |
| ret |
| |
| ASM_SIZE_DIRECTIVE(C_SYMBOL_NAME(__mpn_addmul_1)) |