summaryrefslogtreecommitdiff
path: root/libf2c/libU77/getlog_.c
diff options
context:
space:
mode:
authorghazi <ghazi@138bc75d-0d04-0410-961f-82ee72b054a4>2002-06-01 12:38:32 +0000
committerghazi <ghazi@138bc75d-0d04-0410-961f-82ee72b054a4>2002-06-01 12:38:32 +0000
commit0fa1f522915088d7bcbf7c9492fa70dc6cddaa17 (patch)
treec6c7b1fe59f3ddb8b8ccf102855193850daecdfc /libf2c/libU77/getlog_.c
parentbc09eb06ee8c1540503d5314a71617de2151fbf2 (diff)
downloadgcc-0fa1f522915088d7bcbf7c9492fa70dc6cddaa17.tar.gz
* libF77/*: Fix formatting.
* libI77/*: Likewise. * libU77/*: Likewise. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@54145 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libf2c/libU77/getlog_.c')
-rw-r--r--libf2c/libU77/getlog_.c20
1 files changed, 12 insertions, 8 deletions
diff --git a/libf2c/libU77/getlog_.c b/libf2c/libU77/getlog_.c
index 98310144eab..94c5f416067 100644
--- a/libf2c/libU77/getlog_.c
+++ b/libf2c/libU77/getlog_.c
@@ -41,8 +41,9 @@ Boston, MA 02111-1307, USA. */
/* SGI also has character*(*) function getlog() */
-extern void s_copy(register char *a, register char *b, ftnlen la, ftnlen lb);
-/* Subroutine */ int G77_getlog_0 (char *str, const ftnlen Lstr)
+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;
@@ -50,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;