From: Jerry DeLisle <jvdelisle@verizon.net>
Date: Mon, 31 Oct 2005 01:00:20 +0000 (+0000)
Subject: re PR libfortran/24584 (Segfault when reading empty string in namelist file)
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=2a81ce9bf2444d44f96e3a2c88cc4551092c416a;p=gcc.git

re PR libfortran/24584 (Segfault when reading empty string in namelist file)

2005-10-31  Jerry DeLisle  <jvdelisle@verizon.net>

        PR libgfortran/24584
        * io/list_read.c (free_saved): Set saved_used to zero.

From-SVN: r106265
---

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 0ea6adbb712..86deed1a341 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,8 @@
+2005-10-31  Jerry DeLisle  <jvdelisle@verizon.net>
+
+        PR libgfortran/24584
+        * io/list_read.c (free_saved): Set saved_used to zero.
+
 2005-10-30  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 
 	PR libfortran/20179
diff --git a/libgfortran/io/list_read.c b/libgfortran/io/list_read.c
index 95cb12659ac..810c856f9ec 100644
--- a/libgfortran/io/list_read.c
+++ b/libgfortran/io/list_read.c
@@ -134,6 +134,7 @@ free_saved (void)
     free_mem (saved_string);
 
   saved_string = NULL;
+  saved_used = 0;
 }