1 1.1 joerg //===-- eqdf2vfp.S - Implement eqdf2vfp -----------------------------------===// 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 int __eqdf2vfp(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(__eqdf2vfp) 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 moveq r0, #1 // set result register to 1 if equal 27 1.1 joerg movne r0, #0 28 1.1 joerg bx lr 29 1.1 joerg END_COMPILERRT_FUNCTION(__eqdf2vfp) 30