[libgfortran, committed] Fix character SELECT library helper function

[François-Xavier Coudert]

Patch below was committed (rev. 128379) as obvious after regtesting on
x86_64-linux. It fixes the handling of character SELECT when no
default case is present, by correctly initializing a variable in the
library (PR33386).

FX




Index: ChangeLog
===================================================================
--- ChangeLog   (revision 128378)
+++ ChangeLog   (working copy)
@@ -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
Index: runtime/select.c
===================================================================
--- runtime/select.c    (revision 128373)
+++ runtime/select.c    (working copy)
@@ -53,7 +53,7 @@ select_string (select_struct *table, int
 {
   select_struct *t;
   int i, low, high, mid;
-  int default_jump;
+  int default_jump = -1;

   if (table_len == 0)
     return -1;