1207151Smarius
2207151Smarius/*
3207151Smarius===============================================================================
4207151Smarius
5207151SmariusThis C source file is part of TestFloat, Release 2a, a package of programs
6207151Smariusfor testing the correctness of floating-point arithmetic complying to the
7207151SmariusIEC/IEEE Standard for Floating-Point.
8207151Smarius
9207151SmariusWritten by John R. Hauser.  More information is available through the Web
10207151Smariuspage `http://HTTP.CS.Berkeley.EDU/~jhauser/arithmetic/TestFloat.html'.
11207151Smarius
12207151SmariusTHIS SOFTWARE IS DISTRIBUTED AS IS, FOR FREE.  Although reasonable effort
13207151Smariushas been made to avoid it, THIS SOFTWARE MAY CONTAIN FAULTS THAT WILL AT
14207151SmariusTIMES RESULT IN INCORRECT BEHAVIOR.  USE OF THIS SOFTWARE IS RESTRICTED TO
15207151SmariusPERSONS AND ORGANIZATIONS WHO CAN AND WILL TAKE FULL RESPONSIBILITY FOR ANY
16207151SmariusAND ALL LOSSES, COSTS, OR OTHER PROBLEMS ARISING FROM ITS USE.
17207151Smarius
18207151SmariusDerivative works are acceptable, even for commercial purposes, so long as
19207151Smarius(1) they include prominent notice that the work is derivative, and (2) they
20207151Smariusinclude prominent notice akin to these four paragraphs for those parts of
21207151Smariusthis code that are retained.
22207151Smarius
23207151Smarius===============================================================================
24207151Smarius*/
25207151Smarius
26207151Smarius#include <sys/cdefs.h>
27207151Smarius__FBSDID("$FreeBSD$");
28207151Smarius
29207151Smarius#include <ieeefp.h>
30207151Smarius#include "milieu.h"
31207151Smarius#include "systmodes.h"
32207151Smarius
33207151Smarius/*
34207151Smarius-------------------------------------------------------------------------------
35207151SmariusSets the system's IEC/IEEE floating-point rounding mode.
36207151Smarius-------------------------------------------------------------------------------
37207151Smarius*/
38207151Smariusvoid syst_float_set_rounding_mode( int8 roundingMode )
39207151Smarius{
40207151Smarius
41207151Smarius    (void) fpsetround( roundingMode );
42207151Smarius
43207151Smarius}
44207151Smarius
45207151Smarius/*
46207151Smarius-------------------------------------------------------------------------------
47207151SmariusDoes nothing.
48207151Smarius-------------------------------------------------------------------------------
49207151Smarius*/
50207151Smariusvoid syst_float_set_rounding_precision( int8 precision )
51207151Smarius{
52207151Smarius
53207151Smarius}
54207151Smarius
55