1 /* 2 * "@(#)i_nint.c 1.1" 3 */ 4 5 long int i_nint(x) 6 float *x; 7 { 8 double floor(); 9 10 return( (*x)>=0 ? 11 floor(*x + .5) : -floor(.5 - *x) ); 12 } 13