aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gdb/ChangeLog6
-rw-r--r--gdb/ada-lang.c4
2 files changed, 7 insertions, 3 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index f6bef91..b8ed3a1 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,11 @@
2003-06-17 Stephane Carrez <stcarrez@nerim.fr>
+ * ada-lang.c (scan_discrim_bound): Name first argument.
+ (ada_add_block_symbols): Remove BLOCK_SYM to use local variable
+ declared by ALL_BLOCK_SYMBOLS.
+
+2003-06-17 Stephane Carrez <stcarrez@nerim.fr>
+
* ada-tasks.c (find_function_in_inferior): Don't declare it.
("regcache.h"): Include it.
* ada-lex.l (block_lookup): Replace VAR_NAMESPACE with VAR_DOMAIN.
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index eaa5281..26780e3 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -4038,8 +4038,6 @@ ada_add_block_symbols (struct block *block, const char *name,
ALL_BLOCK_SYMBOLS (block, iter, sym)
{
- struct symbol *sym = BLOCK_SYM (block, i);
-
if (SYMBOL_DOMAIN (sym) == domain)
{
int cmp;
@@ -7710,7 +7708,7 @@ ada_vax_float_print_function (struct type *type)
not alter *PX and *PNEW_K if unsuccessful. */
static int
-scan_discrim_bound (char *, int k, struct value *dval, LONGEST * px,
+scan_discrim_bound (char *str, int k, struct value *dval, LONGEST * px,
int *pnew_k)
{
static char *bound_buffer = NULL;