|  | /* MN10300 64-bit arithmetic left shift | 
|  | * | 
|  | * Copyright (C) 2007 Red Hat, Inc. All Rights Reserved. | 
|  | * Written by David Howells (dhowells@redhat.com) | 
|  | * | 
|  | * This program is free software; you can redistribute it and/or | 
|  | * modify it under the terms of the GNU General Public Licence | 
|  | * as published by the Free Software Foundation; either version | 
|  | * 2 of the Licence, or (at your option) any later version. | 
|  | */ | 
|  | #include <asm/cache.h> | 
|  |  | 
|  | .text | 
|  | .balign	L1_CACHE_BYTES | 
|  |  | 
|  | ############################################################################### | 
|  | # | 
|  | # unsigned long long __ashldi3(unsigned long long value [D1:D0], | 
|  | #			       unsigned by [(12,SP)]) | 
|  | # | 
|  | ############################################################################### | 
|  | .globl	__ashldi3 | 
|  | .type	__ashldi3,@function | 
|  | __ashldi3: | 
|  | mov	(12,sp),a0 | 
|  | and	+63,a0 | 
|  | beq	__ashldi3_zero | 
|  |  | 
|  | cmp	+31,a0 | 
|  | bhi	__ashldi3_32plus | 
|  |  | 
|  | # the count is in the range 1-31 | 
|  | asl	a0,d1 | 
|  |  | 
|  | mov	+32,a1 | 
|  | sub	a0,a1,a1			# a1 = 32 - count | 
|  | lsr	a1,d0,a1			# get overflow from LSW -> MSW | 
|  |  | 
|  | or_asl	a1,d1,a0,d0			# insert overflow into MSW and | 
|  | # shift the LSW | 
|  | rets | 
|  |  | 
|  | .balign	L1_CACHE_BYTES | 
|  | # the count is in the range 32-63 | 
|  | __ashldi3_32plus: | 
|  | asl	a0,d0,d1 | 
|  | clr	d0 | 
|  | __ashldi3_zero: | 
|  | rets | 
|  |  | 
|  | .size	__ashldi3, .-__ashldi3 |