]>
Commit | Line | Data |
---|---|---|
99dee823 | 1 | /* Copyright (C) 2008-2021 Free Software Foundation, Inc. |
d38a64b4 JR |
2 | Contributor: Joern Rennecke <joern.rennecke@embecosm.com> |
3 | on behalf of Synopsys Inc. | |
4 | ||
5 | This file is part of GCC. | |
6 | ||
7 | GCC is free software; you can redistribute it and/or modify it under | |
8 | the terms of the GNU General Public License as published by the Free | |
9 | Software Foundation; either version 3, or (at your option) any later | |
10 | version. | |
11 | ||
12 | GCC is distributed in the hope that it will be useful, but WITHOUT ANY | |
13 | WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
14 | FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
15 | for more details. | |
16 | ||
17 | Under Section 7 of GPL version 3, you are granted additional | |
18 | permissions described in the GCC Runtime Library Exception, version | |
19 | 3.1, as published by the Free Software Foundation. | |
20 | ||
21 | You should have received a copy of the GNU General Public License and | |
22 | a copy of the GCC Runtime Library Exception along with this program; | |
23 | see the files COPYING3 and COPYING.RUNTIME respectively. If not, see | |
24 | <http://www.gnu.org/licenses/>. */ | |
25 | ||
26 | #include "arc-ieee-754.h" | |
27 | /* inputs: DBL0, DBL1 | |
28 | output: z flag | |
29 | clobber: r12, flags | |
30 | For NaNs, bit 19.. bit 30 of the high word must be set. */ | |
31 | #if 0 /* DEBUG */ | |
32 | .global __uneqdf2 | |
33 | .balign 4 | |
34 | FUNC(__uneqdf2) | |
35 | __uneqdf2: | |
36 | st.a r11,[sp,-4]` push_s blink` st.a r10,[sp,-4]` st.a r9,[sp,-4] | |
37 | st.a r8,[sp,-4]` st.a r7,[sp,-4]` st.a r6,[sp,-4]` st.a r5,[sp,-4] | |
38 | st.a r4,[sp,-4]` push_s r3` push_s r2` push_s r1` | |
39 | bl.d __eqdf2_c` push_s r0 | |
40 | push_s r0` ld_s r0, [sp,4]` ld_s r1, [sp,8]` ld_s r2,[sp,12] | |
41 | bl.d __unorddf2_c` ld_s r3,[sp,16] | |
42 | ld.ab r11,[sp,4]` tst r0,r0` mov.ne r11,0 | |
43 | pop_s r0` pop_s r1` pop_s r2` pop_s r3 | |
44 | ld.ab r4,[sp,4]` ld.ab r5,[sp,4]` ld.ab r6,[sp,4]` | |
45 | ld.ab r7,[sp,4]` ld.ab r8,[sp,4]` ld.ab r9,[sp,4] | |
46 | bl.d __uneqdf2_asm` ld.ab r10,[sp,4] | |
47 | pop_s blink | |
48 | breq.d r11,0,0f | |
49 | ld.ab r11,[sp,4] | |
50 | jne_s [blink] | |
51 | bl abort | |
52 | 0: jeq_s [blink] | |
53 | bl abort | |
54 | ENDFUNC(__uneqdf2) | |
55 | #define __uneqdf2 __uneqdf2_asm | |
56 | #endif /* DEBUG */ | |
57 | .global __uneqdf2 | |
58 | .balign 4 | |
59 | HIDDEN_FUNC(__uneqdf2) | |
60 | __uneqdf2: | |
61 | cmp_s DBL0H,DBL1H | |
62 | cmp.eq DBL0L,DBL1L | |
63 | jeq_s [blink] | |
64 | or r12,DBL0H,DBL1H | |
65 | or.f 0,DBL0L,DBL1L | |
66 | bclr.eq.f r12,r12,31 | |
67 | jeq_s [blink] | |
68 | mov_s r12, \ | |
69 | 0x7ff80000 | |
70 | bic.f 0,r12,DBL0H | |
71 | j_s.d [blink] | |
72 | bic.ne.f r12,r12,DBL1H | |
73 | ENDFUNC(__uneqdf2) |