OpenCloudOS-Kernel/arch/mn10300/lib/__ashldi3.S

52 lines
1.2 KiB
ArmAsm
Raw Normal View History

/* 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