1*0b57cec5SDimitry Andric//===-- truncdfsf2vfp.S - Implement truncdfsf2vfp -------------------------===// 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#include "../assembly.h" 10*0b57cec5SDimitry Andric 11*0b57cec5SDimitry Andric// 12*0b57cec5SDimitry Andric// extern float __truncdfsf2vfp(double a); 13*0b57cec5SDimitry Andric// 14*0b57cec5SDimitry Andric// Converts double precision float to signle precision result. 15*0b57cec5SDimitry Andric// Uses Darwin calling convention where a double precision parameter is 16*0b57cec5SDimitry Andric// passed in a R0/R1 pair and a signle precision result is returned in R0. 17*0b57cec5SDimitry Andric// 18*0b57cec5SDimitry Andric .syntax unified 19*0b57cec5SDimitry Andric .p2align 2 20*0b57cec5SDimitry AndricDEFINE_COMPILERRT_FUNCTION(__truncdfsf2vfp) 21*0b57cec5SDimitry Andric#if defined(COMPILER_RT_ARMHF_TARGET) 22*0b57cec5SDimitry Andric vcvt.f32.f64 s0, d0 23*0b57cec5SDimitry Andric#else 24*0b57cec5SDimitry Andric vmov d7, r0, r1 // load double from r0/r1 pair 25*0b57cec5SDimitry Andric vcvt.f32.f64 s15, d7 // convert double to single (trucate precision) 26*0b57cec5SDimitry Andric vmov r0, s15 // return result in r0 27*0b57cec5SDimitry Andric#endif 28*0b57cec5SDimitry Andric bx lr 29*0b57cec5SDimitry AndricEND_COMPILERRT_FUNCTION(__truncdfsf2vfp) 30*0b57cec5SDimitry Andric 31*0b57cec5SDimitry AndricNO_EXEC_STACK_DIRECTIVE 32*0b57cec5SDimitry Andric 33