diff options
Diffstat (limited to 'contrib/libf2c/libF77/l_ge.c')
-rw-r--r-- | contrib/libf2c/libF77/l_ge.c | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/contrib/libf2c/libF77/l_ge.c b/contrib/libf2c/libF77/l_ge.c index 86b4a1f..78af8d0 100644 --- a/contrib/libf2c/libF77/l_ge.c +++ b/contrib/libf2c/libF77/l_ge.c @@ -1,12 +1,8 @@ #include "f2c.h" -#ifdef KR_headers -extern integer s_cmp(); -logical l_ge(a,b,la,lb) char *a, *b; ftnlen la, lb; -#else -extern integer s_cmp(char *, char *, ftnlen, ftnlen); -logical l_ge(char *a, char *b, ftnlen la, ftnlen lb) -#endif +extern integer s_cmp (char *, char *, ftnlen, ftnlen); +logical +l_ge (char *a, char *b, ftnlen la, ftnlen lb) { -return(s_cmp(a,b,la,lb) >= 0); + return (s_cmp (a, b, la, lb) >= 0); } |