1#ifndef __mips_soft_float
2
3.set	noreorder
4
5.global	feclearexcept
6.type	feclearexcept,@function
7feclearexcept:
8	and	$4, $4, 0x7c
9	cfc1	$5, $31
10	or	$5, $5, $4
11	xor	$5, $5, $4
12	ctc1	$5, $31
13	jr	$ra
14	li	$2, 0
15
16.global	feraiseexcept
17.type	feraiseexcept,@function
18feraiseexcept:
19	and	$4, $4, 0x7c
20	cfc1	$5, $31
21	or	$5, $5, $4
22	ctc1	$5, $31
23	jr	$ra
24	li	$2, 0
25
26.global	fetestexcept
27.type	fetestexcept,@function
28fetestexcept:
29	and	$4, $4, 0x7c
30	cfc1	$2, $31
31	jr	$ra
32	and	$2, $2, $4
33
34.global	fegetround
35.type	fegetround,@function
36fegetround:
37	cfc1	$2, $31
38	jr	$ra
39	andi	$2, $2, 3
40
41.global	__fesetround
42.type	__fesetround,@function
43__fesetround:
44	cfc1	$5, $31
45	li	$6, -4
46	and	$5, $5, $6
47	or	$5, $5, $4
48	ctc1	$5, $31
49	jr	$ra
50	li	$2, 0
51
52.global	fegetenv
53.type	fegetenv,@function
54fegetenv:
55	cfc1	$5, $31
56	sw	$5, 0($4)
57	jr	$ra
58	li	$2, 0
59
60.global	fesetenv
61.type	fesetenv,@function
62fesetenv:
63	daddiu	$5, $4, 1
64	beq	$5, $0, 1f
65	nop
66	lw	$5, 0($4)
671:	ctc1	$5, $31
68	jr	$ra
69	li	$2, 0
70
71#endif
72