1/* MN10300 64-bit arithmetic right shift 2 * 3 * Copyright (C) 2007 Red Hat, Inc. All Rights Reserved. 4 * Written by David Howells (dhowells@redhat.com) 5 * 6 * This program is free software; you can redistribute it and/or 7 * modify it under the terms of the GNU General Public Licence 8 * as published by the Free Software Foundation; either version 9 * 2 of the Licence, or (at your option) any later version. 10 */ 11#include <asm/cache.h> 12 13 .text 14 .balign L1_CACHE_BYTES 15 16############################################################################### 17# 18# unsigned long long __ashrdi3(unsigned long long value [D1:D0], 19# unsigned by [(12,SP)]) 20# 21############################################################################### 22 .globl __ashrdi3 23 .type __ashrdi3,@function 24__ashrdi3: 25 mov (12,sp),a0 26 and +63,a0 27 beq __ashrdi3_zero 28 29 cmp +31,a0 30 bhi __ashrdi3_32plus 31 32 # the count is in the range 1-31 33 lsr a0,d0 34 35 mov +32,a1 36 sub a0,a1,a1 # a1 = 32 - count 37 asl a1,d1,a1 # get underflow from MSW -> LSW 38 39 or_asr a1,d0,a0,d1 # insert underflow into LSW and 40 # shift the MSW 41 rets 42 43 .balign L1_CACHE_BYTES 44 # the count is in the range 32-63 45__ashrdi3_32plus: 46 asr a0,d1,d0 47 ext d0 # sign-extend result through MDR 48 mov mdr,d1 49__ashrdi3_zero: 50 rets 51 52 .size __ashrdi3, .-__ashrdi3 53