32 |
#define FT1 (env->ft1) |
#define FT1 (env->ft1) |
33 |
#define FT2 (env->ft2) |
#define FT2 (env->ft2) |
34 |
|
|
|
#define FTS0 ((float)env->ft0) |
|
|
#define FTS1 ((float)env->ft1) |
|
|
#define FTS2 ((float)env->ft2) |
|
|
|
|
35 |
#define PPC_OP(name) void glue(op_, name)(void) |
#define PPC_OP(name) void glue(op_, name)(void) |
36 |
|
|
37 |
#define REG 0 |
#define REG 0 |
1200 |
RETURN(); |
RETURN(); |
1201 |
} |
} |
1202 |
|
|
|
/* fadds - fadds. */ |
|
|
PPC_OP(fadds) |
|
|
{ |
|
|
FT0 = FTS0 + FTS1; |
|
|
RETURN(); |
|
|
} |
|
|
|
|
1203 |
/* fsub - fsub. */ |
/* fsub - fsub. */ |
1204 |
PPC_OP(fsub) |
PPC_OP(fsub) |
1205 |
{ |
{ |
1207 |
RETURN(); |
RETURN(); |
1208 |
} |
} |
1209 |
|
|
|
/* fsubs - fsubs. */ |
|
|
PPC_OP(fsubs) |
|
|
{ |
|
|
FT0 = FTS0 - FTS1; |
|
|
RETURN(); |
|
|
} |
|
|
|
|
1210 |
/* fmul - fmul. */ |
/* fmul - fmul. */ |
1211 |
PPC_OP(fmul) |
PPC_OP(fmul) |
1212 |
{ |
{ |
1214 |
RETURN(); |
RETURN(); |
1215 |
} |
} |
1216 |
|
|
|
/* fmuls - fmuls. */ |
|
|
PPC_OP(fmuls) |
|
|
{ |
|
|
FT0 = FTS0 * FTS1; |
|
|
RETURN(); |
|
|
} |
|
|
|
|
1217 |
/* fdiv - fdiv. */ |
/* fdiv - fdiv. */ |
1218 |
|
void do_fdiv (void); |
1219 |
PPC_OP(fdiv) |
PPC_OP(fdiv) |
1220 |
{ |
{ |
1221 |
FT0 /= FT1; |
do_fdiv(); |
|
RETURN(); |
|
|
} |
|
|
|
|
|
/* fdivs - fdivs. */ |
|
|
PPC_OP(fdivs) |
|
|
{ |
|
|
FT0 = FTS0 / FTS1; |
|
1222 |
RETURN(); |
RETURN(); |
1223 |
} |
} |
1224 |
|
|
1229 |
RETURN(); |
RETURN(); |
1230 |
} |
} |
1231 |
|
|
|
/* fsqrts - fsqrts. */ |
|
|
PPC_OP(fsqrts) |
|
|
{ |
|
|
do_fsqrts(); |
|
|
RETURN(); |
|
|
} |
|
|
|
|
1232 |
/* fres - fres. */ |
/* fres - fres. */ |
1233 |
PPC_OP(fres) |
PPC_OP(fres) |
1234 |
{ |
{ |
1239 |
/* frsqrte - frsqrte. */ |
/* frsqrte - frsqrte. */ |
1240 |
PPC_OP(frsqrte) |
PPC_OP(frsqrte) |
1241 |
{ |
{ |
1242 |
do_fsqrte(); |
do_frsqrte(); |
1243 |
RETURN(); |
RETURN(); |
1244 |
} |
} |
1245 |
|
|
1258 |
RETURN(); |
RETURN(); |
1259 |
} |
} |
1260 |
|
|
|
/* fmadds - fmadds. */ |
|
|
PPC_OP(fmadds) |
|
|
{ |
|
|
FT0 = (FTS0 * FTS1) + FTS2; |
|
|
RETURN(); |
|
|
} |
|
|
|
|
1261 |
/* fmsub - fmsub. */ |
/* fmsub - fmsub. */ |
1262 |
PPC_OP(fmsub) |
PPC_OP(fmsub) |
1263 |
{ |
{ |
1265 |
RETURN(); |
RETURN(); |
1266 |
} |
} |
1267 |
|
|
|
/* fmsubs - fmsubs. */ |
|
|
PPC_OP(fmsubs) |
|
|
{ |
|
|
FT0 = (FTS0 * FTS1) - FTS2; |
|
|
RETURN(); |
|
|
} |
|
|
|
|
1268 |
/* fnmadd - fnmadd. - fnmadds - fnmadds. */ |
/* fnmadd - fnmadd. - fnmadds - fnmadds. */ |
1269 |
PPC_OP(fnmadd) |
PPC_OP(fnmadd) |
1270 |
{ |
{ |
1272 |
RETURN(); |
RETURN(); |
1273 |
} |
} |
1274 |
|
|
|
/* fnmadds - fnmadds. */ |
|
|
PPC_OP(fnmadds) |
|
|
{ |
|
|
do_fnmadds(); |
|
|
RETURN(); |
|
|
} |
|
|
|
|
1275 |
/* fnmsub - fnmsub. */ |
/* fnmsub - fnmsub. */ |
1276 |
PPC_OP(fnmsub) |
PPC_OP(fnmsub) |
1277 |
{ |
{ |
1279 |
RETURN(); |
RETURN(); |
1280 |
} |
} |
1281 |
|
|
|
/* fnmsubs - fnmsubs. */ |
|
|
PPC_OP(fnmsubs) |
|
|
{ |
|
|
do_fnmsubs(); |
|
|
RETURN(); |
|
|
} |
|
|
|
|
1282 |
/*** Floating-Point round & convert ***/ |
/*** Floating-Point round & convert ***/ |
1283 |
/* frsp - frsp. */ |
/* frsp - frsp. */ |
1284 |
PPC_OP(frsp) |
PPC_OP(frsp) |
1319 |
|
|
1320 |
/*** Floating-point move ***/ |
/*** Floating-point move ***/ |
1321 |
/* fabs */ |
/* fabs */ |
1322 |
|
void do_fabs (void); |
1323 |
PPC_OP(fabs) |
PPC_OP(fabs) |
1324 |
{ |
{ |
1325 |
do_fabs(); |
do_fabs(); |
1327 |
} |
} |
1328 |
|
|
1329 |
/* fnabs */ |
/* fnabs */ |
1330 |
|
void do_fnabs (void); |
1331 |
PPC_OP(fnabs) |
PPC_OP(fnabs) |
1332 |
{ |
{ |
1333 |
do_fnabs(); |
do_fnabs(); |