xref: /minix3/sys/external/bsd/compiler_rt/dist/lib/builtins/arm/ltsf2vfp.S (revision 0a6a1f1d05b60e214de2f05a7310ddd1f0e590e7)
1*0a6a1f1dSLionel Sambuc//===-- ltsf2vfp.S - Implement ltsf2vfp -----------------------------------===//
2*0a6a1f1dSLionel Sambuc//
3*0a6a1f1dSLionel Sambuc//                     The LLVM Compiler Infrastructure
4*0a6a1f1dSLionel Sambuc//
5*0a6a1f1dSLionel Sambuc// This file is dual licensed under the MIT and the University of Illinois Open
6*0a6a1f1dSLionel Sambuc// Source Licenses. See LICENSE.TXT for details.
7*0a6a1f1dSLionel Sambuc//
8*0a6a1f1dSLionel Sambuc//===----------------------------------------------------------------------===//
9*0a6a1f1dSLionel Sambuc
10*0a6a1f1dSLionel Sambuc#include "../assembly.h"
11*0a6a1f1dSLionel Sambuc
12*0a6a1f1dSLionel Sambuc//
13*0a6a1f1dSLionel Sambuc// extern int __ltsf2vfp(float a, float b);
14*0a6a1f1dSLionel Sambuc//
15*0a6a1f1dSLionel Sambuc// Returns one iff a < b and neither is NaN.
16*0a6a1f1dSLionel Sambuc// Uses Darwin calling convention where single precision arguments are passsed
17*0a6a1f1dSLionel Sambuc// like 32-bit ints
18*0a6a1f1dSLionel Sambuc//
19*0a6a1f1dSLionel Sambuc	.syntax unified
20*0a6a1f1dSLionel Sambuc	.p2align 2
21*0a6a1f1dSLionel SambucDEFINE_COMPILERRT_FUNCTION(__ltsf2vfp)
22*0a6a1f1dSLionel Sambuc	vmov	s14, r0     // move from GPR 0 to float register
23*0a6a1f1dSLionel Sambuc	vmov	s15, r1     // move from GPR 1 to float register
24*0a6a1f1dSLionel Sambuc	vcmp.f32 s14, s15
25*0a6a1f1dSLionel Sambuc	vmrs	apsr_nzcv, fpscr
26*0a6a1f1dSLionel Sambuc	movmi	r0, #1      // set result register to 1 if equal
27*0a6a1f1dSLionel Sambuc	movpl	r0, #0
28*0a6a1f1dSLionel Sambuc	bx	lr
29*0a6a1f1dSLionel SambucEND_COMPILERRT_FUNCTION(__ltsf2vfp)
30