1 1.1 joerg //===-- ltdf2vfp.S - Implement ltdf2vfp -----------------------------------===// 2 1.1 joerg // 3 1.1 joerg // The LLVM Compiler Infrastructure 4 1.1 joerg // 5 1.1 joerg // This file is dual licensed under the MIT and the University of Illinois Open 6 1.1 joerg // Source Licenses. See LICENSE.TXT for details. 7 1.1 joerg // 8 1.1 joerg //===----------------------------------------------------------------------===// 9 1.1 joerg 10 1.1 joerg #include "../assembly.h" 11 1.1 joerg 12 1.1 joerg // 13 1.1 joerg // extern double __ltdf2vfp(double a, double b); 14 1.1 joerg // 15 1.1 joerg // Returns one iff a < b and neither is NaN. 16 1.1 joerg // Uses Darwin calling convention where double precision arguments are passsed 17 1.1 joerg // like in GPR pairs. 18 1.1 joerg // 19 1.1 joerg .syntax unified 20 1.1.1.2 joerg .p2align 2 21 1.1 joerg DEFINE_COMPILERRT_FUNCTION(__ltdf2vfp) 22 1.1 joerg vmov d6, r0, r1 // load r0/r1 pair in double register 23 1.1 joerg vmov d7, r2, r3 // load r2/r3 pair in double register 24 1.1 joerg vcmp.f64 d6, d7 25 1.1 joerg vmrs apsr_nzcv, fpscr 26 1.1 joerg movmi r0, #1 // set result register to 1 if equal 27 1.1 joerg movpl r0, #0 28 1.1 joerg bx lr 29 1.1 joerg END_COMPILERRT_FUNCTION(__ltdf2vfp) 30