Merge branch 'vendor/GCC50' - gcc 5.0 snapshot 1 FEB 2015
[dragonfly.git] / contrib / gcc-5.0 / libgcc / config / msp430 / srli.S
1 ;   Copyright (C) 2012-2015 Free Software Foundation, Inc.
2 ;   Contributed by Red Hat.
3
4 ; This file is free software; you can redistribute it and/or modify it
5 ; under the terms of the GNU General Public License as published by the
6 ; Free Software Foundation; either version 3, or (at your option) any
7 ; later version.
8
9 ; This file is distributed in the hope that it will be useful, but
10 ; WITHOUT ANY WARRANTY; without even the implied warranty of
11 ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12 ; General Public License for more details.
13
14 ; Under Section 7 of GPL version 3, you are granted additional
15 ; permissions described in the GCC Runtime Library Exception, version
16 ; 3.1, as published by the Free Software Foundation.
17 ;
18 ; You should have received a copy of the GNU General Public License and
19 ; a copy of the GCC Runtime Library Exception along with this program;
20 ; see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
21 ; <http://www.gnu.org/licenses/>.
22         
23         .text
24
25         .macro  _srli n
26         .global __mspabi_srli_\n
27 __mspabi_srli_\n:
28         CLRC
29         RRC.W   R12
30         .endm
31
32 /* Logical Right Shift - R12 -> R12 */
33         _srli   15
34         _srli   14
35         _srli   13
36         _srli   12
37         _srli   11
38         _srli   10
39         _srli   9
40         _srli   8
41         _srli   7
42         _srli   6
43         _srli   5
44         _srli   4
45         _srli   3
46         _srli   2
47         _srli   1
48 #ifdef __MSP430X_LARGE__
49         RETA
50 #else
51         RET
52 #endif
53
54 1:      ADD.W   #-1,R13
55         CLRC
56         RRC.W   R12,R12
57         .global __mspabi_srli
58 __mspabi_srli:
59         CMP     #0,R13
60         JNZ     1b
61 #ifdef __MSP430X_LARGE__
62         RETA
63 #else
64         RET
65 #endif
66
67 /* Logical Right Shift - R12:R13 -> R12:R13 */
68
69         .macro  _srll   n
70         .global __mspabi_srll_\n
71 __mspabi_srll_\n:
72         CLRC
73         RRC.W   R13
74         RRC.W   R12
75         .endm
76
77         _srll   15
78         _srll   14
79         _srll   13
80         _srll   12
81         _srll   11
82         _srll   10
83         _srll   9
84         _srll   8
85         _srll   7
86         _srll   6
87         _srll   5
88         _srll   4
89         _srll   3
90         _srll   2
91         _srll   1
92 #ifdef __MSP430X_LARGE__
93         RETA
94 #else
95         RET
96 #endif
97
98 1:      ADD.W   #-1,R14
99         CLRC
100         RRC.W   R13
101         RRC.W   R12
102         .global __mspabi_srll
103 __mspabi_srll:
104         CMP     #0,R14
105         JNZ     1b
106 #ifdef __MSP430X_LARGE__
107         RETA
108 #else
109         RET
110 #endif