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