h_nint.c

操作系统SunOS 4.1.3版本的源码

#ifndef lint
 static	char sccsid[] = "@(#)h_nint.c 1.1 92/07/30 SMI"; /* from UCB 1.1" */
#endif
/*
 */

short h_nint(x)
float *x;
{
int ir_nint_(); return ir_nint_(x);
}