From: fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Tue, 11 Sep 2007 14:53:02 +0000 (+0000)
Subject: 	PR libfortran/33386
X-Git-Tag: upstream/4.9.2~46234
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=3f382868f1e10cde9bb831905ba3f31de86e9d80;p=platform%2Fupstream%2Flinaro-gcc.git

	PR libfortran/33386
	* runtime/select.c (select_string): Initialize default_jump.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@128379 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 4c92333..eaf7012 100644
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,8 @@
+2007-09-11  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
+
+	PR libfortran/33386
+	* runtime/select.c (select_string): Initialize default_jump.
+
 2007-09-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
 	PR libfortran/33307
diff --git a/libgfortran/runtime/select.c b/libgfortran/runtime/select.c
index cecd025..44c3532 100644
--- a/libgfortran/runtime/select.c
+++ b/libgfortran/runtime/select.c
@@ -53,7 +53,7 @@ select_string (select_struct *table, int table_len, const char *selector,
 {
   select_struct *t;
   int i, low, high, mid;
-  int default_jump;
+  int default_jump = -1;
 
   if (table_len == 0)
     return -1;