ltdf2vfp.S revision e80e978d6aa211056beddf4582390e374d1935ab
1e80e978d6aa211056beddf4582390e374d1935abNick Kledzik//===-- ltdf2vfp.S - Implement ltdf2vfp -----------------------------------===//
2e80e978d6aa211056beddf4582390e374d1935abNick Kledzik//
3e80e978d6aa211056beddf4582390e374d1935abNick Kledzik//                     The LLVM Compiler Infrastructure
4e80e978d6aa211056beddf4582390e374d1935abNick Kledzik//
5e80e978d6aa211056beddf4582390e374d1935abNick Kledzik// This file is distributed under the University of Illinois Open Source
6e80e978d6aa211056beddf4582390e374d1935abNick Kledzik// License. See LICENSE.TXT for details.
7e80e978d6aa211056beddf4582390e374d1935abNick Kledzik//
8e80e978d6aa211056beddf4582390e374d1935abNick Kledzik//===----------------------------------------------------------------------===//
9e80e978d6aa211056beddf4582390e374d1935abNick Kledzik
10e80e978d6aa211056beddf4582390e374d1935abNick Kledzik
11e80e978d6aa211056beddf4582390e374d1935abNick Kledzik//
12e80e978d6aa211056beddf4582390e374d1935abNick Kledzik// extern double __ltdf2vfp(double a, double b);
13e80e978d6aa211056beddf4582390e374d1935abNick Kledzik//
14e80e978d6aa211056beddf4582390e374d1935abNick Kledzik// Returns one iff a < b and neither is NaN.
15e80e978d6aa211056beddf4582390e374d1935abNick Kledzik// Uses Darwin calling convention where double precision arguments are passsed
16e80e978d6aa211056beddf4582390e374d1935abNick Kledzik// like in GPR pairs.
17e80e978d6aa211056beddf4582390e374d1935abNick Kledzik//
18e80e978d6aa211056beddf4582390e374d1935abNick Kledzik	.globl ___ltdf2vfp
19e80e978d6aa211056beddf4582390e374d1935abNick Kledzik___ltdf2vfp:
20e80e978d6aa211056beddf4582390e374d1935abNick Kledzik	fmdrr	d6, r0, r1	// load r0/r1 pair in double register
21e80e978d6aa211056beddf4582390e374d1935abNick Kledzik	fmdrr	d7, r2, r3	// load r2/r3 pair in double register
22e80e978d6aa211056beddf4582390e374d1935abNick Kledzik	fcmpd	d6, d7
23e80e978d6aa211056beddf4582390e374d1935abNick Kledzik	fmstat
24e80e978d6aa211056beddf4582390e374d1935abNick Kledzik	movmi	r0, #1		// set result register to 1 if equal
25e80e978d6aa211056beddf4582390e374d1935abNick Kledzik	movpl	r0, #0
26e80e978d6aa211056beddf4582390e374d1935abNick Kledzik	bx	lr
27