From f95a4a932476be2ba99e2fd081e8d2bc6ea12813 Mon Sep 17 00:00:00 2001 From: PikalaxALT Date: Fri, 15 Dec 2017 09:38:53 -0500 Subject: Import newlib and create makefile --- newlib/libc/sys/sysvi386/fpx.c | 73 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 73 insertions(+) create mode 100644 newlib/libc/sys/sysvi386/fpx.c (limited to 'newlib/libc/sys/sysvi386/fpx.c') diff --git a/newlib/libc/sys/sysvi386/fpx.c b/newlib/libc/sys/sysvi386/fpx.c new file mode 100644 index 0000000..d55a1e3 --- /dev/null +++ b/newlib/libc/sys/sysvi386/fpx.c @@ -0,0 +1,73 @@ +#include +#include + + +fp_except _DEFUN(fpsetmask,(newmask), + fp_except newmask) + +{ + fp_except oldmask; + v60_tkcw_type tkcw; + + sysv60(0, 8, &tkcw); + oldmask = tkcw.fp_trap; + tkcw.fp_trap = newmask; + sysv60(0, 8, &tkcw); + return oldmask; + +} + +fp_except _DEFUN_VOID(fpgetmask) +{ + v60_tkcw_type tkcw; + sysv60(0, 8, &tkcw); + return tkcw.fp_trap; +} + + +fp_rnd _DEFUN_VOID(fpgetround) +{ + v60_tkcw_type tkcw; + sysv60(0, 8, &tkcw); + return tkcw.fp_rounding; +} + +fp_rnd _DEFUN(fpsetround,(rnd), + fp_rnd rnd) +{ + fp_rnd oldrnd; + v60_tkcw_type tkcw; + + sysv60(0, 8, &tkcw); + oldrnd = tkcw.fp_rounding; + tkcw.fp_rounding = rnd; + sysv60(0, 8, &tkcw); + return oldrnd; +} + + + + + +fp_rdi _DEFUN_VOID(fpgetroundtoi) +{ + v60_tkcw_type tkcw; + sysv60(0, 8, &tkcw); + return tkcw.integer_rounding; +} + +fp_rdi _DEFUN(fpsetroundtoi,(rnd), + fp_rdi rnd) +{ + fp_rdi oldrnd; + v60_tkcw_type tkcw; + + sysv60(0, 8, &tkcw); + oldrnd = tkcw.integer_rounding; + tkcw.integer_rounding = rnd; + sysv60(0, 8, &tkcw); + return oldrnd; +} + + + -- cgit v1.2.3