blob: c9401c999e68f81c986a4484856d9bab684efd39 (
plain)
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
|
/* $OpenBSD: fpsetround.c,v 1.4 2013/01/05 11:20:55 miod Exp $ */
/*
* Written by J.T. Conklin, Apr 10, 1995
* Public domain.
* Ported to 88k by Nivas Madhur
*/
#include <ieeefp.h>
fp_rnd
fpsetround(rnd_dir)
fp_rnd rnd_dir;
{
fp_rnd old;
fp_rnd new;
__asm__ volatile("fldcr %0, %%fcr63" : "=r" (old));
new = old;
new &= ~(0x03 << 14); /* clear old value */
new |= ((rnd_dir & 0x03) << 14);/* and set new one */
__asm__ volatile("fstcr %0, %%fcr63" : : "r" (new));
return (old >> 14) & 0x03;
}
|
