diff options
| author | law <law@138bc75d-0d04-0410-961f-82ee72b054a4> | 1998-01-27 09:23:08 +0000 |
|---|---|---|
| committer | law <law@138bc75d-0d04-0410-961f-82ee72b054a4> | 1998-01-27 09:23:08 +0000 |
| commit | 30c1e454c9236cf470be6c287ebac55df5efc4c4 (patch) | |
| tree | 31a50efd213f536fbf550a89ea78bf4d7ec23611 /gcc/tlink.c | |
| parent | 6f9a435a6b4c6333b3d2ff3c5ba91209b9df5411 (diff) | |
| download | gcc-30c1e454c9236cf470be6c287ebac55df5efc4c4.tar.gz | |
* tlink.c (scan_linker_output): Call fclose() for opened files.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@17504 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/tlink.c')
| -rw-r--r-- | gcc/tlink.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/tlink.c b/gcc/tlink.c index 017ac42131e..eb3d878ec51 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); } |