ack/lang/m2/libm2/absl.c
1987-05-13 14:36:45 +00:00

7 lines
52 B
C

long
_absl(i)
long i;
{
return i >= 0 ? i : -i;
}