diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 3df6374835f6..8d567121c489 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2013-07-08  Graham Stott  <graham.stott@btinternet.com>
+	* c-family/array-notation-common.c (length_mismatch_in_expr_p): Delete
+	unused variables l_length and l_node.
+
 2013-07-08  Andreas Krebbel  <Andreas.Krebbel@de.ibm.com>
 
 	* config/s390/s390.c: Rename cfun_set_fpr_bit to cfun_set_fpr_save
diff --git a/gcc/c-family/array-notation-common.c b/gcc/c-family/array-notation-common.c
index 5e17009ee87a..c54f444f757e 100644
--- a/gcc/c-family/array-notation-common.c
+++ b/gcc/c-family/array-notation-common.c
@@ -84,7 +84,6 @@ length_mismatch_in_expr_p (location_t loc, vec<vec<an_parts> >list)
 {
   size_t ii, jj;
   tree length = NULL_TREE;
-  HOST_WIDE_INT l_length, l_node;
   
   size_t x = list.length ();
   size_t y = list[0].length ();