1 /* Pentium __mpn_submul_1 -- Multiply a limb vector with a limb and subtract
2 the result from a second limb vector.
4 Copyright (C) 1992, 1994, 1996 Free Software Foundation, Inc.
6 This file is part of the GNU MP Library.
8 The GNU MP Library is free software; you can redistribute it and/or modify
9 it under the terms of the GNU Library General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or (at your
11 option) any later version.
13 The GNU MP Library is distributed in the hope that it will be useful, but
14 WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
15 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public
16 License for more details.
18 You should have received a copy of the GNU Library General Public License
19 along with the GNU MP Library; see the file COPYING.LIB. If not, write to
20 the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
31 #include "asm-syntax.h"
40 GLOBL C_SYMBOL_NAME(__mpn_submul_1)
41 C_SYMBOL_NAME(__mpn_submul_1:)
48 INSN2(mov,l ,R(res_ptr),MEM_DISP(esp,20))
49 INSN2(mov,l ,R(s1_ptr),MEM_DISP(esp,24))
50 INSN2(mov,l ,R(size),MEM_DISP(esp,28))
51 INSN2(mov,l ,R(s2_limb),MEM_DISP(esp,32))
53 INSN2(lea,l ,R(res_ptr),MEM_INDEX(res_ptr,size,4))
54 INSN2(lea,l ,R(s1_ptr),MEM_INDEX(s1_ptr,size,4))
56 INSN2(xor,l ,R(ebx),R(ebx))
59 Loop: INSN2(adc,l ,R(ebx),$0)
60 INSN2(mov,l ,R(eax),MEM_INDEX(s1_ptr,size,4))
62 INSN1(mul,l ,R(s2_limb))
64 INSN2(add,l ,R(eax),R(ebx))
65 INSN2(mov,l ,R(ebx),MEM_INDEX(res_ptr,size,4))
67 INSN2(adc,l ,R(edx),$0)
68 INSN2(sub,l ,R(ebx),R(eax))
70 INSN2(mov,l ,MEM_INDEX(res_ptr,size,4),R(ebx))
73 INSN2(mov,l ,R(ebx),R(edx))
76 INSN2(adc,l ,R(ebx),$0)
77 INSN2(mov,l ,R(eax),R(ebx))