110504Sdlw /* 2*22917Skre * Copyright (c) 1980 Regents of the University of California. 3*22917Skre * All rights reserved. The Berkeley software License Agreement 4*22917Skre * specifies the terms and conditions for redistribution. 5*22917Skre * 6*22917Skre * @(#)i_sign.c 5.1 06/07/85 710504Sdlw */ 810504Sdlw 910504Sdlw long int i_sign(a,b) 1010504Sdlw long int *a, *b; 1110504Sdlw { 1210504Sdlw long int x; 1310504Sdlw x = (*a >= 0 ? *a : - *a); 1410504Sdlw return( *b >= 0 ? x : -x); 1510504Sdlw } 16