52 lines
		
	
	
	
		
			1.2 KiB
			
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
		
		
			
		
	
	
			52 lines
		
	
	
	
		
			1.2 KiB
			
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
| 
								 | 
							
								/* 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
							 |