| /* Copyright (C) 2008-2023 Free Software Foundation, Inc. |
| Contributor: Joern Rennecke <joern.rennecke@embecosm.com> |
| on behalf of Synopsys Inc. |
| |
| This file is part of GCC. |
| |
| GCC is free software; you can redistribute it and/or modify it under |
| the terms of the GNU General Public License as published by the Free |
| Software Foundation; either version 3, or (at your option) any later |
| version. |
| |
| GCC is distributed in the hope that it will be useful, but WITHOUT ANY |
| WARRANTY; without even the implied warranty of MERCHANTABILITY or |
| FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
| for more details. |
| |
| Under Section 7 of GPL version 3, you are granted additional |
| permissions described in the GCC Runtime Library Exception, version |
| 3.1, as published by the Free Software Foundation. |
| |
| You should have received a copy of the GNU General Public License and |
| a copy of the GCC Runtime Library Exception along with this program; |
| see the files COPYING3 and COPYING.RUNTIME respectively. If not, see |
| <http://www.gnu.org/licenses/>. */ |
| |
| #include "arc-ieee-754.h" |
| /* inputs: r0, r1 |
| output: c flag |
| clobber: r12, flags |
| For NaNs, bit 22 .. bit 30 must be set. */ |
| #if 0 /* DEBUG */ |
| .global __ordsf2 |
| .balign 4 |
| FUNC(__ordsf2) |
| __ordsf2: |
| st.a r11,[sp,-4]` push_s blink` st.a r10,[sp,-4]` st.a r9,[sp,-4] |
| st.a r8,[sp,-4]` st.a r7,[sp,-4]` st.a r6,[sp,-4]` st.a r5,[sp,-4] |
| st.a r4,[sp,-4]` push_s r3` push_s r2` push_s r1` |
| bl.d __unordsf2_c` push_s r0 |
| mov r11,r0` pop_s r0` pop_s r1` pop_s r2` pop_s r3 |
| ld.ab r4,[sp,4]` ld.ab r5,[sp,4]` ld.ab r6,[sp,4]` |
| ld.ab r7,[sp,4]` ld.ab r8,[sp,4]` ld.ab r9,[sp,4] |
| bl.d __ordsf2_asm` ld.ab r10,[sp,4] |
| pop_s blink |
| brne.d r11,0,0f |
| ld.ab r11,[sp,4] |
| jcc [blink] |
| bl abort |
| 0: jcs [blink] |
| bl abort |
| ENDFUNC(__ordsf2) |
| #define __ordsf2 __ordsf2_asm |
| #endif /* DEBUG */ |
| .global __ordsf2 |
| .balign 4 |
| HIDDEN_FUNC(__ordsf2) |
| __ordsf2: |
| bmsk r12,r0,23 |
| add1.f r12,r12,r0 /* clear z; set c if NaN. */ |
| bmsk r12,r1,23 |
| j_s.d [blink] |
| add1.cc.f r12,r12,r1 /* clear z; set c if NaN. */ |
| ENDFUNC(__ordsf2) |
