h_abs.c

来自「unix v7是最后一个广泛发布的研究型UNIX版本」· C语言 代码 · 共 8 行

short h_abs(x)
short *x;
{
if(*x >= 0)
	return(*x);
return(- *x);
}