blob: 365937edc2d529044f7b02d8cdc1522d33692600 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
/* $Id: fcmpes.c,v 1.8 1999/05/28 13:41:45 jj Exp $
* arch/sparc/math-emu/fcmpes.c
*
* Copyright (C) 1997, 1999 Jakub Jelinek (jj@ultra.linux.cz)
* Copyright (C) 1998 Peter Maydell (pmaydell@chiark.greenend.org.uk)
*
*/
#include "sfp-util.h"
#include "soft-fp.h"
#include "single.h"
int FCMPES(void *rd, void *rs2, void *rs1)
{
FP_DECL_EX;
FP_DECL_S(A); FP_DECL_S(B);
long ret;
unsigned long fsr;
FP_UNPACK_RAW_SP(A, rs1);
FP_UNPACK_RAW_SP(B, rs2);
FP_CMP_S(ret, B, A, 3);
if (ret == 3)
FP_SET_EXCEPTION(FP_EX_INVALID);
if (!FP_INHIBIT_RESULTS) {
if (ret == -1) ret = 2;
fsr = *(long *)rd;
fsr &= ~0xc00;
fsr |= (ret << 10);
*(long *)rd = fsr;
}
FP_HANDLE_EXCEPTIONS;
}
|