1 /* i80386 __mpn_lshift --
3 Copyright (C) 1992, 1994 Free Software Foundation, Inc.
5 This file is part of the GNU MP Library.
7 The GNU MP Library is free software; you can redistribute it and/or modify
8 it under the terms of the GNU Library General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or (at your
10 option) any later version.
12 The GNU MP Library is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public
15 License for more details.
17 You should have received a copy of the GNU Library General Public License
18 along with the GNU MP Library; see the file COPYING.LIB. If not, write to
19 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
20 MA 02111-1307, USA. */
31 #include "asm-syntax.h"
35 .globl C_SYMBOL_NAME(__mpn_lshift)
36 C_SYMBOL_NAME(__mpn_lshift:)
41 movl 16(%esp),%edi /* res_ptr */
42 movl 20(%esp),%esi /* s_ptr */
43 movl 24(%esp),%edx /* size */
44 movl 28(%esp),%ecx /* cnt */
46 subl $4,%esi /* adjust s_ptr */
48 movl (%esi,%edx,4),%ebx /* read most significant limb */
50 shldl %cl,%ebx,%eax /* compute carry limb */
53 pushl %eax /* push carry limb onto stack */
55 jnz L1 /* enter loop in the middle */
59 Loop: movl (%esi,%edx,4),%ebx /* load next lower limb */
60 shldl %cl,%ebx,%eax /* compute result limb */
61 movl %eax,(%edi,%edx,4) /* store it */
63 L1: movl (%esi,%edx,4),%eax
65 movl %ebx,(%edi,%edx,4)
69 shll %cl,%eax /* compute least significant limb */
70 movl %eax,(%edi) /* store it */
72 popl %eax /* pop carry limb */
79 Lend: shll %cl,%ebx /* compute least significant limb */
80 movl %ebx,(%edi) /* store it */