Aren
/
toaruos
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

libc: fprem fmod()

This commit is contained in:
K. Lange 2018-12-08 13:33:25 +09:00
parent 52f35de578
commit d63c98b6bf
1 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
libc/math/math.c
View File

@ -78,14 +78,15 @@ float fabsf(float x) {
double fmod(double x, double y) {
MATH;
if (x >= 0.0) {
while (x > y) {
x -= y;
}
return x;
} else {
return 0.0;
}
long double out;
asm volatile (
"1: fprem;" /* Partial remainder */
" fnstsw %%ax;" /* store status word */
" sahf;" /* store AX (^ FPU status) into flags */
" jp 1b;" /* jump back to 1 above if parity flag==1 */
: "=t"(out) : "0"(x), "u"(y) : "ax", "cc");
return out;
}
double sqrt(double x) {