2004-02-17 David Mosberger <davidm@hpl.hp.com>

[deliverable/binutils-gdb.git] / gdb / ada-exp.y

diff --git a/gdb/ada-exp.y b/gdb/ada-exp.y
index 70e6e089dd554eb50d0e2e9545f39db2e47ac250..f4cbb37316a5374345b62fc51b49c3a9346d1e83 100644 (file)
--- a/gdb/ada-exp.y
+++ b/gdb/ada-exp.y
@@ -823,7 +823,7 @@ write_object_renaming (orig_left_context, renaming)
          simple_tail += 1;
          break;
        } 
-      else if (STREQN (simple_tail, "__", 2))
+      else if (DEPRECATED_STREQN (simple_tail, "__", 2))
        {
          simple_tail += 2;
          break;
@@ -840,7 +840,7 @@ write_object_renaming (orig_left_context, renaming)
      parser-defs.h, implemented in parse.c */    
   strncpy (name, expr, suffix-expr);
   name[suffix-expr] = '\000';
-  sym = lookup_symbol (name, orig_left_context, VAR_NAMESPACE, 0, NULL);
+  sym = lookup_symbol (name, orig_left_context, VAR_DOMAIN, 0, NULL);
   /*  if (sym == NULL) 
     error ("Could not find renamed variable: %s", ada_demangle (name));
   */
@@ -893,7 +893,7 @@ write_object_renaming (orig_left_context, renaming)
            suffix = end;
 
            index_sym = 
-             lookup_symbol (index_name, NULL, VAR_NAMESPACE, 0, NULL);
+             lookup_symbol (index_name, NULL, VAR_DOMAIN, 0, NULL);
            if (index_sym == NULL)
              error ("Could not find %s", index_name);
            write_var_from_sym (NULL, block_found, sym);
@@ -962,7 +962,7 @@ convert_char_literal (struct type* type, LONGEST val)
   sprintf (name, "QU%02x", (int) val);
   for (f = 0; f < TYPE_NFIELDS (type); f += 1) 
     {
-      if (STREQ (name, TYPE_FIELD_NAME (type, f)))
+      if (DEPRECATED_STREQ (name, TYPE_FIELD_NAME (type, f)))
        return TYPE_FIELD_BITPOS (type, f);
     }
   return val;