diff options
author | Marc Espie <espie@cvs.openbsd.org> | 2004-12-30 17:35:29 +0000 |
---|---|---|
committer | Marc Espie <espie@cvs.openbsd.org> | 2004-12-30 17:35:29 +0000 |
commit | 157d4bd650a3e421c5bac48da7e528af9a6a76e2 (patch) | |
tree | 0379fb2c85e183c3c5669d425b3e42ae4592791b /gnu/lib/libf2c/libU77/getlog_.c | |
parent | 791194721fec8918406191b62da6dc41f2d690e5 (diff) |
Actual synch with 3.3.5.
Changes in Makefile.bsd-wrapper to avoid prereq.
Fix in lib*/config.h.in to include the right ones and get the correct
definitions.
Bump of shlib_version accordingly.
Diffstat (limited to 'gnu/lib/libf2c/libU77/getlog_.c')
-rw-r--r-- | gnu/lib/libf2c/libU77/getlog_.c | 26 |
1 files changed, 12 insertions, 14 deletions
diff --git a/gnu/lib/libf2c/libU77/getlog_.c b/gnu/lib/libf2c/libU77/getlog_.c index 82cb564a67a..94c5f416067 100644 --- a/gnu/lib/libf2c/libU77/getlog_.c +++ b/gnu/lib/libf2c/libU77/getlog_.c @@ -41,14 +41,9 @@ Boston, MA 02111-1307, USA. */ /* SGI also has character*(*) function getlog() */ -#ifdef KR_headers -extern VOID s_copy (); -/* Subroutine */ int G77_getlog_0 (str, Lstr) - char *str; ftnlen Lstr; -#else -extern void s_copy(register char *a, register char *b, ftnlen la, ftnlen lb); -/* Subroutine */ int G77_getlog_0 (char *str, const ftnlen Lstr) -#endif +extern void s_copy (register char *a, register char *b, ftnlen la, ftnlen lb); +/* Subroutine */ int +G77_getlog_0 (char *str, const ftnlen Lstr) { size_t i; char *p; @@ -56,12 +51,15 @@ extern void s_copy(register char *a, register char *b, ftnlen la, ftnlen lb); #if defined (HAVE_GETLOGIN) p = getlogin (); - if (p != NULL) { - i = strlen (p); - s_copy (str, p, Lstr, i); - } else { - s_copy (str, " ", Lstr, 1); - } + if (p != NULL) + { + i = strlen (p); + s_copy (str, p, Lstr, i); + } + else + { + s_copy (str, " ", Lstr, 1); + } status = 0; #else errno = ENOSYS; |