xref: /freebsd-src/contrib/llvm-project/compiler-rt/lib/builtins/hexagon/sfdiv_opt.S (revision 0b57cec536236d46e3dba9bd041533462f33dbb7)
1*0b57cec5SDimitry Andric//===----------------------Hexagon builtin routine ------------------------===//
2*0b57cec5SDimitry Andric//
3*0b57cec5SDimitry Andric// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4*0b57cec5SDimitry Andric// See https://llvm.org/LICENSE.txt for license information.
5*0b57cec5SDimitry Andric// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6*0b57cec5SDimitry Andric//
7*0b57cec5SDimitry Andric//===----------------------------------------------------------------------===//
8*0b57cec5SDimitry Andric
9*0b57cec5SDimitry Andric	.macro FUNCTION_BEGIN name
10*0b57cec5SDimitry Andric	.text
11*0b57cec5SDimitry Andric	.p2align 5
12*0b57cec5SDimitry Andric	.globl \name
13*0b57cec5SDimitry Andric	.type  \name, @function
14*0b57cec5SDimitry Andric\name:
15*0b57cec5SDimitry Andric	.endm
16*0b57cec5SDimitry Andric
17*0b57cec5SDimitry Andric	.macro FUNCTION_END name
18*0b57cec5SDimitry Andric	.size  \name, . - \name
19*0b57cec5SDimitry Andric	.endm
20*0b57cec5SDimitry Andric
21*0b57cec5SDimitry Andric#define Q6_ALIAS(TAG) .global __qdsp_##TAG ; .set __qdsp_##TAG, __hexagon_##TAG
22*0b57cec5SDimitry Andric#define FAST_ALIAS(TAG) .global __hexagon_fast_##TAG ; .set __hexagon_fast_##TAG, __hexagon_##TAG
23*0b57cec5SDimitry Andric#define FAST2_ALIAS(TAG) .global __hexagon_fast2_##TAG ; .set __hexagon_fast2_##TAG, __hexagon_##TAG
24*0b57cec5SDimitry Andric
25*0b57cec5SDimitry AndricFUNCTION_BEGIN __hexagon_divsf3
26*0b57cec5SDimitry Andric  {
27*0b57cec5SDimitry Andric    r2,p0 = sfrecipa(r0,r1)
28*0b57cec5SDimitry Andric    r4 = sffixupd(r0,r1)
29*0b57cec5SDimitry Andric    r3 = ##0x3f800000   // 1.0
30*0b57cec5SDimitry Andric  }
31*0b57cec5SDimitry Andric  {
32*0b57cec5SDimitry Andric    r5 = sffixupn(r0,r1)
33*0b57cec5SDimitry Andric    r3 -= sfmpy(r4,r2):lib  // 1-(den/recip) yields error?
34*0b57cec5SDimitry Andric    r6 = ##0x80000000
35*0b57cec5SDimitry Andric    r7 = r3
36*0b57cec5SDimitry Andric  }
37*0b57cec5SDimitry Andric  {
38*0b57cec5SDimitry Andric    r2 += sfmpy(r3,r2):lib
39*0b57cec5SDimitry Andric    r3 = r7
40*0b57cec5SDimitry Andric    r6 = r5
41*0b57cec5SDimitry Andric    r0 = and(r6,r5)
42*0b57cec5SDimitry Andric  }
43*0b57cec5SDimitry Andric  {
44*0b57cec5SDimitry Andric    r3 -= sfmpy(r4,r2):lib
45*0b57cec5SDimitry Andric    r0 += sfmpy(r5,r2):lib
46*0b57cec5SDimitry Andric  }
47*0b57cec5SDimitry Andric  {
48*0b57cec5SDimitry Andric    r2 += sfmpy(r3,r2):lib
49*0b57cec5SDimitry Andric    r6 -= sfmpy(r0,r4):lib
50*0b57cec5SDimitry Andric  }
51*0b57cec5SDimitry Andric  {
52*0b57cec5SDimitry Andric    r0 += sfmpy(r6,r2):lib
53*0b57cec5SDimitry Andric  }
54*0b57cec5SDimitry Andric  {
55*0b57cec5SDimitry Andric    r5 -= sfmpy(r0,r4):lib
56*0b57cec5SDimitry Andric  }
57*0b57cec5SDimitry Andric  {
58*0b57cec5SDimitry Andric    r0 += sfmpy(r5,r2,p0):scale
59*0b57cec5SDimitry Andric    jumpr r31
60*0b57cec5SDimitry Andric  }
61*0b57cec5SDimitry AndricFUNCTION_END __hexagon_divsf3
62*0b57cec5SDimitry Andric
63*0b57cec5SDimitry AndricQ6_ALIAS(divsf3)
64*0b57cec5SDimitry AndricFAST_ALIAS(divsf3)
65*0b57cec5SDimitry AndricFAST2_ALIAS(divsf3)
66