migrate substitution keywords to SVN
[reactos.git] / reactos / ntoskrnl / rtl / i386 / aullshr.s
1 /* $Id$
2 *
3 * COPYRIGHT: See COPYING in the top level directory
4 * PROJECT: ReactOS kernel
5 * PURPOSE: Math support for IA-32
6 * FILE: ntoskrnl/rtl/i386/aullshr.s
7 * PROGRAMER: Eric Kohl (ekohl@rz-online.de)
8 */
9
10 /*
11 * unsigned long long
12 * __aullshr(unsigned long long Value, unsigned char Shift);
13 *
14 * Parameters:
15 * EDX:EAX - unsigned long long value to be shifted right
16 * CL - number of bits to shift by
17 * Registers:
18 * Destroys CL
19 * Returns:
20 * EDX:EAX - shifted value
21 */
22 .globl __aullshr
23 __aullshr:
24 shrdl %cl, %edx, %eax
25 shrl %cl, %edx
26 andl $32, %ecx
27 je L1
28 movl %edx, %eax
29 L1:
30 ret
31
32 /* EOF */