From 7b6ffd1189e854afec67a05baca2e1a58819b5b3 Mon Sep 17 00:00:00 2001 From: Kamil Iskra Date: Tue, 27 Jan 1998 10:23:08 +0100 Subject: * tlink.c (scan_linker_output): Call fclose() for opened files. From-SVN: r17504 --- gcc/tlink.c | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'gcc/tlink.c') 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); } -- cgit v1.1