diff options
| author | Kamil Iskra <iskra@student.uci.agh.edu.pl> | 1998-01-27 10:23:08 +0100 |
|---|---|---|
| committer | Jeff Law <law@gcc.gnu.org> | 1998-01-27 02:23:08 -0700 |
| commit | 7b6ffd1189e854afec67a05baca2e1a58819b5b3 (patch) | |
| tree | 31a50efd213f536fbf550a89ea78bf4d7ec23611 | |
| parent | 60593797295652db1541766f03223e9e6127c9a5 (diff) | |
| download | gcc-7b6ffd1189e854afec67a05baca2e1a58819b5b3.zip gcc-7b6ffd1189e854afec67a05baca2e1a58819b5b3.tar.gz gcc-7b6ffd1189e854afec67a05baca2e1a58819b5b3.tar.bz2 | |
* tlink.c (scan_linker_output): Call fclose() for opened files.
From-SVN: r17504
| -rw-r--r-- | gcc/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/tlink.c | 6 |
2 files changed, 9 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index ba970d5..545ac81 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,7 @@ +Tue Jan 27 10:22:13 1998 Kamil Iskra <iskra@student.uci.agh.edu.pl> + + * tlink.c (scan_linker_output): Call fclose() for opened files. + Tue Jan 27 05:05:26 1998 Richard Henderson <rth@cygnus.com> * alpha.c (output_epilog [!VMS]): Don't tag global functions if 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); } |