ack/lang/basic/lib/abs.c

11 lines
122 B
C
Raw Permalink Normal View History

#include "lib.h"
1987-03-31 11:06:20 +00:00
2016-12-12 20:15:25 +00:00
long _abl(long i)
1984-11-29 14:22:02 +00:00
{
return (i >= 0 ? i : -i);
1984-11-29 14:22:02 +00:00
}
2016-12-12 20:15:25 +00:00
double _abr(double f)
{
return (f >= 0.0 ? f : -f);
1984-11-29 14:22:02 +00:00
}