summaryrefslogtreecommitdiffstats
path: root/contrib/libf2c/libF77/h_sign.c
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/libf2c/libF77/h_sign.c')
-rw-r--r--contrib/libf2c/libF77/h_sign.c13
1 files changed, 5 insertions, 8 deletions
diff --git a/contrib/libf2c/libF77/h_sign.c b/contrib/libf2c/libF77/h_sign.c
index 7b06c15..7040232 100644
--- a/contrib/libf2c/libF77/h_sign.c
+++ b/contrib/libf2c/libF77/h_sign.c
@@ -1,12 +1,9 @@
#include "f2c.h"
-#ifdef KR_headers
-shortint h_sign(a,b) shortint *a, *b;
-#else
-shortint h_sign(shortint *a, shortint *b)
-#endif
+shortint
+h_sign (shortint * a, shortint * b)
{
-shortint x;
-x = (*a >= 0 ? *a : - *a);
-return( *b >= 0 ? x : -x);
+ shortint x;
+ x = (*a >= 0 ? *a : -*a);
+ return (*b >= 0 ? x : -x);
}
OpenPOWER on IntegriCloud