From 43997658f83d47b02ff6329c2e7e562c68eeb86c Mon Sep 17 00:00:00 2001
From: Jan Hubicka <jh@suse.cz>
Date: Tue, 21 Oct 2003 16:40:11 +0200
Subject: * haifa-sched.c (choose_ready): Initialize index.

From-SVN: r72756
---
 gcc/f/lex.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'gcc/f/lex.c')

diff --git a/gcc/f/lex.c b/gcc/f/lex.c
index 02f08728..3be91b6 100644
--- a/gcc/f/lex.c
+++ b/gcc/f/lex.c
@@ -721,7 +721,7 @@ ffelex_cfelex_ (ffelexToken *xtoken, FILE *finput, int c)
 	{
 	  bool done = FALSE;
 	  int use_d = 0;
-	  int d;
+	  int d = 0;
 
 	  switch (c)
 	    {
-- 
cgit v1.1