diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 8b70893c1bd..bbe2b6dd370 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+2010-05-07  Joel Brobecker  <brobecker@adacore.com>
+
+	* ada-lang.c (assign_aggregate): Remove unused variable.
+
 2010-05-07  Sami Wagiaalla  <swagiaal@redhat.com>
 
 	PR C++/7943:
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index f68825c91a5..3b3894c1498 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -8049,7 +8049,6 @@ assign_aggregate (struct value *container,
   int max_indices, num_indices;
   int is_array_aggregate;
   int i;
-  struct value *mark = value_mark ();
 
   *pos += 3;
   if (noside != EVAL_NORMAL)