aboutsummaryrefslogtreecommitdiff
path: root/gcc/tlink.c
diff options
context:
space:
mode:
authorKamil Iskra <iskra@student.uci.agh.edu.pl>1998-01-27 10:23:08 +0100
committerJeff Law <law@gcc.gnu.org>1998-01-27 02:23:08 -0700
commit7b6ffd1189e854afec67a05baca2e1a58819b5b3 (patch)
tree31a50efd213f536fbf550a89ea78bf4d7ec23611 /gcc/tlink.c
parent60593797295652db1541766f03223e9e6127c9a5 (diff)
downloadgcc-7b6ffd1189e854afec67a05baca2e1a58819b5b3.zip
gcc-7b6ffd1189e854afec67a05baca2e1a58819b5b3.tar.gz
gcc-7b6ffd1189e854afec67a05baca2e1a58819b5b3.tar.bz2
* tlink.c (scan_linker_output): Call fclose() for opened files.
From-SVN: r17504
Diffstat (limited to 'gcc/tlink.c')
-rw-r--r--gcc/tlink.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/tlink.c b/gcc/tlink.c
index 017ac42..eb3d878 100644
--- a/gcc/tlink.c
+++ b/gcc/tlink.c
@@ -575,7 +575,10 @@ scan_linker_output (fname)
}
if (sym && sym->tweaked)
- return 0;
+ {
+ fclose (stream);
+ return 0;
+ }
if (sym && !sym->tweaking)
{
if (tlink_verbose >= 2)
@@ -588,6 +591,7 @@ scan_linker_output (fname)
obstack_free (&temporary_obstack, temporary_firstobj);
}
+ fclose (stream);
return (file_stack != NULL);
}