10b57cec5SDimitry Andric//===-- ledf2vfp.S - Implement ledf2vfp -----------------------------------===// 20b57cec5SDimitry Andric// 30b57cec5SDimitry Andric// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. 40b57cec5SDimitry Andric// See https://llvm.org/LICENSE.txt for license information. 50b57cec5SDimitry Andric// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception 60b57cec5SDimitry Andric// 70b57cec5SDimitry Andric//===----------------------------------------------------------------------===// 80b57cec5SDimitry Andric 90b57cec5SDimitry Andric#include "../assembly.h" 100b57cec5SDimitry Andric 110b57cec5SDimitry Andric// 120b57cec5SDimitry Andric// extern double __ledf2vfp(double a, double b); 130b57cec5SDimitry Andric// 140b57cec5SDimitry Andric// Returns one iff a <= b and neither is NaN. 150b57cec5SDimitry Andric// Uses Darwin calling convention where double precision arguments are passsed 160b57cec5SDimitry Andric// like in GPR pairs. 170b57cec5SDimitry Andric// 180b57cec5SDimitry Andric .syntax unified 190b57cec5SDimitry Andric .p2align 2 200b57cec5SDimitry AndricDEFINE_COMPILERRT_FUNCTION(__ledf2vfp) 210b57cec5SDimitry Andric#if defined(COMPILER_RT_ARMHF_TARGET) 220b57cec5SDimitry Andric vcmp.f64 d0, d1 230b57cec5SDimitry Andric#else 240b57cec5SDimitry Andric vmov d6, r0, r1 // load r0/r1 pair in double register 250b57cec5SDimitry Andric vmov d7, r2, r3 // load r2/r3 pair in double register 260b57cec5SDimitry Andric vcmp.f64 d6, d7 270b57cec5SDimitry Andric#endif 280b57cec5SDimitry Andric vmrs apsr_nzcv, fpscr 290b57cec5SDimitry Andric ITE(ls) 300b57cec5SDimitry Andric movls r0, #1 // set result register to 1 if equal 310b57cec5SDimitry Andric movhi r0, #0 320b57cec5SDimitry Andric bx lr 330b57cec5SDimitry AndricEND_COMPILERRT_FUNCTION(__ledf2vfp) 340b57cec5SDimitry Andric 350b57cec5SDimitry AndricNO_EXEC_STACK_DIRECTIVE 360b57cec5SDimitry Andric 37