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., 675 Mass Ave, Cambridge, MA 02139, USA. */
30 #include "asm-syntax.h"
34 .globl C_SYMBOL_NAME(__mpn_lshift)
35 C_SYMBOL_NAME(__mpn_lshift:)
40 movl 16(%esp),%edi /* res_ptr */
41 movl 20(%esp),%esi /* s_ptr */
42 movl 24(%esp),%edx /* size */
43 movl 28(%esp),%ecx /* cnt */
45 subl $4,%esi /* adjust s_ptr */
47 movl (%esi,%edx,4),%ebx /* read most significant limb */
49 shldl %cl,%ebx,%eax /* compute carry limb */
52 pushl %eax /* push carry limb onto stack */
54 jnz L1 /* enter loop in the middle */
58 Loop: movl (%esi,%edx,4),%ebx /* load next lower limb */
59 shldl %cl,%ebx,%eax /* compute result limb */
60 movl %eax,(%edi,%edx,4) /* store it */
62 L1: movl (%esi,%edx,4),%eax
64 movl %ebx,(%edi,%edx,4)
68 shll %cl,%eax /* compute least significant limb */
69 movl %eax,(%edi) /* store it */
71 popl %eax /* pop carry limb */
78 Lend: shll %cl,%ebx /* compute least significant limb */
79 movl %ebx,(%edi) /* store it */