mirror of https://github.com/lianthony/NT4.0
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
44 lines
615 B
44 lines
615 B
/***
|
|
*frnd.c -
|
|
*
|
|
* Copyright (c) 1991-91, Microsoft Corporation
|
|
*
|
|
*Purpose:
|
|
*
|
|
*
|
|
*Revision History:
|
|
*
|
|
* 10-20-91 GDP written
|
|
*/
|
|
|
|
/***
|
|
*double _frnd(double x) - round to integer
|
|
*
|
|
*Purpose:
|
|
* Round to integer according to the current rounding mode.
|
|
* NaN's or infinities are NOT handled
|
|
*
|
|
*Entry:
|
|
*
|
|
*Exit:
|
|
*
|
|
*Exceptions:
|
|
*******************************************************************************/
|
|
|
|
|
|
double _frnd(double x)
|
|
{
|
|
double result;
|
|
|
|
#if defined i386 || defined _X86SEG_
|
|
_asm {
|
|
fld x
|
|
frndint
|
|
fstp result
|
|
}
|
|
#else
|
|
#error Only 386 platform supported
|
|
#endif
|
|
|
|
return result;
|
|
}
|