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
|