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