blob: 4dc9f47fb5baa5c366a03b00bb9c6eb8f908d86b [file] [log] [blame]
Nick Kledzike80e9782009-09-12 01:23:48 +00001//===-- ledf2vfp.S - Implement ledf2vfp -----------------------------------===//
2//
3// The LLVM Compiler Infrastructure
4//
5// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9
10
11//
12// extern double __ledf2vfp(double a, double b);
13//
14// Returns one iff a <= b and neither is NaN.
15// Uses Darwin calling convention where double precision arguments are passsed
16// like in GPR pairs.
17//
18 .globl ___ledf2vfp
19___ledf2vfp:
20 fmdrr d6, r0, r1 // load r0/r1 pair in double register
21 fmdrr d7, r2, r3 // load r2/r3 pair in double register
22 fcmpd d6, d7
23 fmstat
24 movls r0, #1 // set result register to 1 if equal
25 movhi r0, #0
26 bx lr