]> CyberLeo.Net >> Repos - FreeBSD/releng/10.0.git/blob - contrib/compiler-rt/lib/arm/unorddf2vfp.S
- Copy stable/10 (r259064) to releng/10.0 as part of the
[FreeBSD/releng/10.0.git] / contrib / compiler-rt / lib / arm / unorddf2vfp.S
1 //===-- unorddf2vfp.S - Implement unorddf2vfp ------------------------------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is dual licensed under the MIT and the University of Illinois Open
6 // Source Licenses. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9
10 #include "../assembly.h"
11
12 //
13 // extern int __unorddf2vfp(double a, double b);
14 //
15 // Returns one iff a or b is NaN
16 // Uses Darwin calling convention where double precision arguments are passsed 
17 // like in GPR pairs.
18 //
19         .syntax unified
20         .align 2
21 DEFINE_COMPILERRT_FUNCTION(__unorddf2vfp)
22         vmov    d6, r0, r1      // load r0/r1 pair in double register
23         vmov    d7, r2, r3      // load r2/r3 pair in double register
24         vcmp.f64 d6, d7         
25         vmrs    apsr_nzcv, fpscr
26         movvs   r0, #1      // set result register to 1 if "overflow" (any NaNs)
27         movvc   r0, #0
28         bx      lr