1#ifndef __mips_soft_float
2
3.set noreorder
4.global feclearexcept
5.type feclearexcept,@function
6feclearexcept:
7 and $4, $4, 0x7c
8 cfc1 $5, $31
9 or $5, $5, $4
10 xor $5, $5, $4
11 ctc1 $5, $31
12 jr $ra
13 li $2, 0
14
15.global feraiseexcept
16.type feraiseexcept,@function
17feraiseexcept:
18 and $4, $4, 0x7c
19 cfc1 $5, $31
20 or $5, $5, $4
21 ctc1 $5, $31
22 jr $ra
23 li $2, 0
24
25.global fetestexcept
26.type fetestexcept,@function
27fetestexcept:
28 and $4, $4, 0x7c
29 cfc1 $2, $31
30 jr $ra
31 and $2, $2, $4
32
33.global fegetround
34.type fegetround,@function
35fegetround:
36 cfc1 $2, $31
37 jr $ra
38 andi $2, $2, 3
39
40.global __fesetround
41.hidden __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 addiu $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