diff options
Diffstat (limited to 'arch/arm/lib/ashldi3.c')
-rw-r--r-- | arch/arm/lib/ashldi3.c | 61 |
1 files changed, 61 insertions, 0 deletions
diff --git a/arch/arm/lib/ashldi3.c b/arch/arm/lib/ashldi3.c new file mode 100644 index 000000000000..130f5a839669 --- /dev/null +++ b/arch/arm/lib/ashldi3.c | |||
@@ -0,0 +1,61 @@ | |||
1 | /* More subroutines needed by GCC output code on some machines. */ | ||
2 | /* Compile this one with gcc. */ | ||
3 | /* Copyright (C) 1989, 92-98, 1999 Free Software Foundation, Inc. | ||
4 | |||
5 | This file is part of GNU CC. | ||
6 | |||
7 | GNU CC is free software; you can redistribute it and/or modify | ||
8 | it under the terms of the GNU General Public License as published by | ||
9 | the Free Software Foundation; either version 2, or (at your option) | ||
10 | any later version. | ||
11 | |||
12 | GNU CC is distributed in the hope that it will be useful, | ||
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
15 | GNU General Public License for more details. | ||
16 | |||
17 | You should have received a copy of the GNU General Public License | ||
18 | along with GNU CC; see the file COPYING. If not, write to | ||
19 | the Free Software Foundation, 59 Temple Place - Suite 330, | ||
20 | Boston, MA 02111-1307, USA. */ | ||
21 | |||
22 | /* As a special exception, if you link this library with other files, | ||
23 | some of which are compiled with GCC, to produce an executable, | ||
24 | this library does not by itself cause the resulting executable | ||
25 | to be covered by the GNU General Public License. | ||
26 | This exception does not however invalidate any other reasons why | ||
27 | the executable file might be covered by the GNU General Public License. | ||
28 | */ | ||
29 | /* support functions required by the kernel. based on code from gcc-2.95.3 */ | ||
30 | /* I Molton 29/07/01 */ | ||
31 | |||
32 | #include "gcclib.h" | ||
33 | |||
34 | DItype | ||
35 | __ashldi3 (DItype u, word_type b) | ||
36 | { | ||
37 | DIunion w; | ||
38 | word_type bm; | ||
39 | DIunion uu; | ||
40 | |||
41 | if (b == 0) | ||
42 | return u; | ||
43 | |||
44 | uu.ll = u; | ||
45 | |||
46 | bm = (sizeof (SItype) * BITS_PER_UNIT) - b; | ||
47 | if (bm <= 0) | ||
48 | { | ||
49 | w.s.low = 0; | ||
50 | w.s.high = (USItype)uu.s.low << -bm; | ||
51 | } | ||
52 | else | ||
53 | { | ||
54 | USItype carries = (USItype)uu.s.low >> bm; | ||
55 | w.s.low = (USItype)uu.s.low << b; | ||
56 | w.s.high = ((USItype)uu.s.high << b) | carries; | ||
57 | } | ||
58 | |||
59 | return w.ll; | ||
60 | } | ||
61 | |||