summaryrefslogtreecommitdiffstats
path: root/lib/libI77/endfile.c
diff options
context:
space:
mode:
Diffstat (limited to 'lib/libI77/endfile.c')
-rw-r--r--lib/libI77/endfile.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/libI77/endfile.c b/lib/libI77/endfile.c
index f5990e3..8425a29 100644
--- a/lib/libI77/endfile.c
+++ b/lib/libI77/endfile.c
@@ -43,7 +43,7 @@ integer f_end(alist *a)
(void) sprintf(nbuf,"fort.%ld",a->aunit);
#ifdef NON_UNIX_STDIO
{ FILE *tf;
- if (tf = fopen(nbuf, f__w_mode[0]))
+ if ( (tf = fopen(nbuf, f__w_mode[0])) )
fclose(tf);
}
#else
@@ -63,7 +63,7 @@ copy(from, len, to) char *from, *to; register long len;
copy(FILE *from, register long len, FILE *to)
#endif
{
- int k, len1;
+ int len1;
char buf[BUFSIZ];
while(fread(buf, len1 = len > BUFSIZ ? BUFSIZ : (int)len, 1, from)) {
OpenPOWER on IntegriCloud