From 37e9221a5d1905cba45c96ac44dbe26d947bc4af Mon Sep 17 00:00:00 2001 From: charles forsyth Date: Sun, 18 May 2014 14:19:01 +0100 Subject: 20140518-1419 --- lib9/setfcr-MacOSX-power.c | 39 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) create mode 100644 lib9/setfcr-MacOSX-power.c (limited to 'lib9/setfcr-MacOSX-power.c') diff --git a/lib9/setfcr-MacOSX-power.c b/lib9/setfcr-MacOSX-power.c new file mode 100644 index 00000000..17b76a88 --- /dev/null +++ b/lib9/setfcr-MacOSX-power.c @@ -0,0 +1,39 @@ +/* + * MacOSX/Darwin ppc fpu support + * Mimic Plan9 floating point support + */ + +#include "lib9.h" +#include + +__inline__ ulong +getfcr(void) +{ + ppc_fp_scr_t fpscr = get_fp_scr(); + return ((ulong *)&fpscr)[1]; +} + +ulong +getfsr(void) +{ + ppc_fp_scr_t fpscr = get_fp_scr(); + return ((ulong *)&fpscr)[1]; +} + +void +setfsr(ulong fsr) +{ + ppc_fp_scr_t fpscr; + // fpscr = get_fp_scr(); + (((ulong *)&fpscr)[1]) = fsr; + set_fp_scr(fpscr); +} + +void +setfcr(ulong fcr) +{ + ppc_fp_scr_t fpscr; + // fpscr = get_fp_scr(); + (((ulong *)&fpscr)[1]) = fcr; + set_fp_scr(fpscr); +} -- cgit v1.2.3