lib9/setfcr-MacOSX-power.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37

/*
 * MacOSX/Darwin ppc fpu support
 * Mimic Plan9 floating point support
 */

#include "lib9.h"
#include <architecture/ppc/fp_regs.h>

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 = get_fp_scr();
	(((ulong*)&fpscr)[1]) = fsr;
	set_fp_scr(fpscr);
}

void
setfcr(ulong fcr)
{
	ppc_fp_scr_t fpscr = get_fp_scr();
	(((ulong*)&fpscr)[1]) = fcr;
	set_fp_scr(fpscr);
}