From 7b6ffd1189e854afec67a05baca2e1a58819b5b3 Mon Sep 17 00:00:00 2001 From: Kamil Iskra Date: Tue, 27 Jan 1998 10:23:08 +0100 Subject: [PATCH] * tlink.c (scan_linker_output): Call fclose() for opened files. From-SVN: r17504 --- gcc/ChangeLog | 4 ++++ gcc/tlink.c | 6 +++++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/gcc/ChangeLog b/gcc/ChangeLog index ba970d5f15c..545ac816f67 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,7 @@ +Tue Jan 27 10:22:13 1998 Kamil Iskra + + * tlink.c (scan_linker_output): Call fclose() for opened files. + Tue Jan 27 05:05:26 1998 Richard Henderson * alpha.c (output_epilog [!VMS]): Don't tag global functions if 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); } -- 2.30.2