2010-03-16 Segher Boessenkool <segher@kernel.crashing.org>

        * gmon_io.c (gmon_out_read): Close file when done.

diff --git a/gprof/ChangeLog b/gprof/ChangeLog
index 5c616b9..1cb31ec 100644 (file)
--- a/gprof/ChangeLog
+++ b/gprof/ChangeLog
@@ -1,3 +1,7 @@
+2010-03-16  Segher Boessenkool  <segher@kernel.crashing.org>
+
+       * gmon_io.c (gmon_out_read): Close file when done.
+
 2010-02-15  Nick Clifton  <nickc@redhat.com>
 
        * po/vi.po: Updated Vietnamese translation.

diff --git a/gprof/gmon_io.c b/gprof/gmon_io.c
index f48d3bc..1b046d4 100644 (file)
--- a/gprof/gmon_io.c
+++ b/gprof/gmon_io.c
@@ -573,6 +573,9 @@ gmon_out_read (const char *filename)
       done (1);
     }
 
+  if (ifp != stdin)
+    fclose (ifp);
+
   if (output_style & STYLE_GMON_INFO)
     {
       printf (_("File `%s' (version %d) contains:\n"),