contrib/llvm-project/compiler-rt/lib/builtins/hexagon/sfdiv_opt.S

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