]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/libf2c/libF77/h_abs.c
add -n option to suppress clearing the build tree and add -DNO_CLEAN
[FreeBSD/FreeBSD.git] / contrib / libf2c / libF77 / h_abs.c
1 #include "f2c.h"
2
3 shortint
4 h_abs (shortint * x)
5 {
6   if (*x >= 0)
7     return (*x);
8   return (-*x);
9 }