110497Sdlw /* 2*22909Skre * Copyright (c) 1980 Regents of the University of California. 3*22909Skre * All rights reserved. The Berkeley software License Agreement 4*22909Skre * specifies the terms and conditions for redistribution. 5*22909Skre * 6*22909Skre * @(#)i_abs.c 5.1 06/07/85 710497Sdlw */ 810497Sdlw 910497Sdlw long int i_abs(x) 1010497Sdlw long int *x; 1110497Sdlw { 1210497Sdlw if(*x >= 0) 1310497Sdlw return(*x); 1410497Sdlw return(- *x); 1510497Sdlw } 16