/********************************************************************** * Copyright (c) Digital Equipment Corporation 1984, 1985, 1986. * * All Rights Reserved. * * Reference "/usr/src/COPYRIGHT" for applicable restrictions. * **********************************************************************/ /* * SCCSID: @(#)h_sign.c 3.0 4/22/86 */ short h_sign(a,b) short *a, *b; { short x; x = (*a >= 0 ? *a : - *a); return( *b >= 0 ? x : -x); }