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 10*0b57cec5SDimitry Andric 11*0b57cec5SDimitry Andric .macro FUNCTION_BEGIN name 12*0b57cec5SDimitry Andric .text 13*0b57cec5SDimitry Andric .p2align 5 14*0b57cec5SDimitry Andric .globl \name 15*0b57cec5SDimitry Andric .type \name, @function 16*0b57cec5SDimitry Andric\name: 17*0b57cec5SDimitry Andric .endm 18*0b57cec5SDimitry Andric 19*0b57cec5SDimitry Andric .macro FUNCTION_END name 20*0b57cec5SDimitry Andric .size \name, . - \name 21*0b57cec5SDimitry Andric .endm 22*0b57cec5SDimitry Andric 23*0b57cec5SDimitry Andric 24*0b57cec5SDimitry AndricFUNCTION_BEGIN __hexagon_modsi3 25*0b57cec5SDimitry Andric { 26*0b57cec5SDimitry Andric p2 = cmp.ge(r0,#0) 27*0b57cec5SDimitry Andric r2 = abs(r0) 28*0b57cec5SDimitry Andric r1 = abs(r1) 29*0b57cec5SDimitry Andric } 30*0b57cec5SDimitry Andric { 31*0b57cec5SDimitry Andric r3 = cl0(r2) 32*0b57cec5SDimitry Andric r4 = cl0(r1) 33*0b57cec5SDimitry Andric p0 = cmp.gtu(r1,r2) 34*0b57cec5SDimitry Andric } 35*0b57cec5SDimitry Andric { 36*0b57cec5SDimitry Andric r3 = sub(r4,r3) 37*0b57cec5SDimitry Andric if (p0) jumpr r31 38*0b57cec5SDimitry Andric } 39*0b57cec5SDimitry Andric { 40*0b57cec5SDimitry Andric p1 = cmp.eq(r3,#0) 41*0b57cec5SDimitry Andric loop0(1f,r3) 42*0b57cec5SDimitry Andric r0 = r2 43*0b57cec5SDimitry Andric r2 = lsl(r1,r3) 44*0b57cec5SDimitry Andric } 45*0b57cec5SDimitry Andric .falign 46*0b57cec5SDimitry Andric1: 47*0b57cec5SDimitry Andric { 48*0b57cec5SDimitry Andric p0 = cmp.gtu(r2,r0) 49*0b57cec5SDimitry Andric if (!p0.new) r0 = sub(r0,r2) 50*0b57cec5SDimitry Andric r2 = lsr(r2,#1) 51*0b57cec5SDimitry Andric if (p1) r1 = #0 52*0b57cec5SDimitry Andric }:endloop0 53*0b57cec5SDimitry Andric { 54*0b57cec5SDimitry Andric p0 = cmp.gtu(r2,r0) 55*0b57cec5SDimitry Andric if (!p0.new) r0 = sub(r0,r1) 56*0b57cec5SDimitry Andric if (p2) jumpr r31 57*0b57cec5SDimitry Andric } 58*0b57cec5SDimitry Andric { 59*0b57cec5SDimitry Andric r0 = neg(r0) 60*0b57cec5SDimitry Andric jumpr r31 61*0b57cec5SDimitry Andric } 62*0b57cec5SDimitry AndricFUNCTION_END __hexagon_modsi3 63*0b57cec5SDimitry Andric 64*0b57cec5SDimitry Andric .globl __qdsp_modsi3 65*0b57cec5SDimitry Andric .set __qdsp_modsi3, __hexagon_modsi3 66