53 lines
		
	
	
		
			1.3 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			53 lines
		
	
	
		
			1.3 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
/* MN10300 64-bit arithmetic right 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 __ashrdi3(unsigned long long value [D1:D0],
 | 
						|
#			       unsigned by [(12,SP)])
 | 
						|
#
 | 
						|
###############################################################################
 | 
						|
        .globl	__ashrdi3
 | 
						|
        .type	__ashrdi3,@function
 | 
						|
__ashrdi3:
 | 
						|
	mov	(12,sp),a0
 | 
						|
	and	+63,a0
 | 
						|
	beq	__ashrdi3_zero
 | 
						|
 | 
						|
	cmp	+31,a0
 | 
						|
	bhi	__ashrdi3_32plus
 | 
						|
 | 
						|
	# the count is in the range 1-31
 | 
						|
	lsr	a0,d0
 | 
						|
 | 
						|
	mov	+32,a1
 | 
						|
	sub	a0,a1,a1			# a1 = 32 - count
 | 
						|
	asl	a1,d1,a1			# get underflow from MSW -> LSW
 | 
						|
 | 
						|
	or_asr	a1,d0,a0,d1			# insert underflow into LSW and
 | 
						|
						# shift the MSW
 | 
						|
	rets
 | 
						|
 | 
						|
	.balign	L1_CACHE_BYTES
 | 
						|
	# the count is in the range 32-63
 | 
						|
__ashrdi3_32plus:
 | 
						|
	asr	a0,d1,d0
 | 
						|
	ext	d0				# sign-extend result through MDR
 | 
						|
	mov	mdr,d1
 | 
						|
__ashrdi3_zero:
 | 
						|
	rets
 | 
						|
 | 
						|
	.size	__ashrdi3, .-__ashrdi3
 |