From 558ba97bdeac5a68bb9248a5c4cdf2feeb24e771 Mon Sep 17 00:00:00 2001
From: "Arnold D. Robbins" <arnold@skeeve.com>
Date: Fri, 16 Jul 2010 12:45:40 +0300
Subject: Move to gawk-3.0.1.

---
 array.c | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'array.c')

diff --git a/array.c b/array.c
index 348b3433..cbc1a236 100644
--- a/array.c
+++ b/array.c
@@ -3,7 +3,7 @@
  */
 
 /* 
- * Copyright (C) 1986, 1988, 1989, 1991 - 95 the Free Software Foundation, Inc.
+ * Copyright (C) 1986, 1988, 1989, 1991 - 96 the Free Software Foundation, Inc.
  * 
  * This file is part of GAWK, the GNU implementation of the
  * AWK Programming Language.
@@ -213,14 +213,12 @@ NODE *symbol;
 register NODE *subs;
 int hash1;
 {
-	register NODE *bucket, *prev = 0;
+	register NODE *bucket;
 
 	for (bucket = symbol->var_array[hash1]; bucket != NULL;
 			bucket = bucket->ahnext) {
 		if (cmp_nodes(bucket->ahname, subs) == 0)
 			return bucket;
-		else
-			prev = bucket;	/* save previous list entry */
 	}
 	return NULL;
 }
-- 
cgit v1.2.3