GNU Linux-libre 4.14.266-gnu1
[releases.git] / arch / x86 / math-emu / fpu_arith.c
1 // SPDX-License-Identifier: GPL-2.0
2 /*---------------------------------------------------------------------------+
3  |  fpu_arith.c                                                              |
4  |                                                                           |
5  | Code to implement the FPU register/register arithmetic instructions       |
6  |                                                                           |
7  | Copyright (C) 1992,1993,1997                                              |
8  |                  W. Metzenthen, 22 Parker St, Ormond, Vic 3163, Australia |
9  |                  E-mail   billm@suburbia.net                              |
10  |                                                                           |
11  |                                                                           |
12  +---------------------------------------------------------------------------*/
13
14 #include "fpu_system.h"
15 #include "fpu_emu.h"
16 #include "control_w.h"
17 #include "status_w.h"
18
19 void fadd__(void)
20 {
21         /* fadd st,st(i) */
22         int i = FPU_rm;
23         clear_C1();
24         FPU_add(&st(i), FPU_gettagi(i), 0, control_word);
25 }
26
27 void fmul__(void)
28 {
29         /* fmul st,st(i) */
30         int i = FPU_rm;
31         clear_C1();
32         FPU_mul(&st(i), FPU_gettagi(i), 0, control_word);
33 }
34
35 void fsub__(void)
36 {
37         /* fsub st,st(i) */
38         clear_C1();
39         FPU_sub(0, FPU_rm, control_word);
40 }
41
42 void fsubr_(void)
43 {
44         /* fsubr st,st(i) */
45         clear_C1();
46         FPU_sub(REV, FPU_rm, control_word);
47 }
48
49 void fdiv__(void)
50 {
51         /* fdiv st,st(i) */
52         clear_C1();
53         FPU_div(0, FPU_rm, control_word);
54 }
55
56 void fdivr_(void)
57 {
58         /* fdivr st,st(i) */
59         clear_C1();
60         FPU_div(REV, FPU_rm, control_word);
61 }
62
63 void fadd_i(void)
64 {
65         /* fadd st(i),st */
66         int i = FPU_rm;
67         clear_C1();
68         FPU_add(&st(i), FPU_gettagi(i), i, control_word);
69 }
70
71 void fmul_i(void)
72 {
73         /* fmul st(i),st */
74         clear_C1();
75         FPU_mul(&st(0), FPU_gettag0(), FPU_rm, control_word);
76 }
77
78 void fsubri(void)
79 {
80         /* fsubr st(i),st */
81         clear_C1();
82         FPU_sub(DEST_RM, FPU_rm, control_word);
83 }
84
85 void fsub_i(void)
86 {
87         /* fsub st(i),st */
88         clear_C1();
89         FPU_sub(REV | DEST_RM, FPU_rm, control_word);
90 }
91
92 void fdivri(void)
93 {
94         /* fdivr st(i),st */
95         clear_C1();
96         FPU_div(DEST_RM, FPU_rm, control_word);
97 }
98
99 void fdiv_i(void)
100 {
101         /* fdiv st(i),st */
102         clear_C1();
103         FPU_div(REV | DEST_RM, FPU_rm, control_word);
104 }
105
106 void faddp_(void)
107 {
108         /* faddp st(i),st */
109         int i = FPU_rm;
110         clear_C1();
111         if (FPU_add(&st(i), FPU_gettagi(i), i, control_word) >= 0)
112                 FPU_pop();
113 }
114
115 void fmulp_(void)
116 {
117         /* fmulp st(i),st */
118         clear_C1();
119         if (FPU_mul(&st(0), FPU_gettag0(), FPU_rm, control_word) >= 0)
120                 FPU_pop();
121 }
122
123 void fsubrp(void)
124 {
125         /* fsubrp st(i),st */
126         clear_C1();
127         if (FPU_sub(DEST_RM, FPU_rm, control_word) >= 0)
128                 FPU_pop();
129 }
130
131 void fsubp_(void)
132 {
133         /* fsubp st(i),st */
134         clear_C1();
135         if (FPU_sub(REV | DEST_RM, FPU_rm, control_word) >= 0)
136                 FPU_pop();
137 }
138
139 void fdivrp(void)
140 {
141         /* fdivrp st(i),st */
142         clear_C1();
143         if (FPU_div(DEST_RM, FPU_rm, control_word) >= 0)
144                 FPU_pop();
145 }
146
147 void fdivp_(void)
148 {
149         /* fdivp st(i),st */
150         clear_C1();
151         if (FPU_div(REV | DEST_RM, FPU_rm, control_word) >= 0)
152                 FPU_pop();
153 }