Remove VAR_DOMAIN/STRUCT_DOMAIN ambiguity from ada-tasks.c.

2014-03-26  Keith Seitz  <keiths@redhat.com>

	* ada-tasks.c (get_tcb_types_info): Search STRUCT_DOMAIN for
	types, not VAR_DOMAIN.
This commit is contained in:
Keith Seitz 2014-03-26 08:25:03 -07:00
parent d80285301a
commit 318d3177f7
2 changed files with 11 additions and 6 deletions

View File

@ -1,3 +1,8 @@
2014-03-26 Keith Seitz <keiths@redhat.com>
* ada-tasks.c (get_tcb_types_info): Search STRUCT_DOMAIN for
types, not VAR_DOMAIN.
2014-03-25 Sandra Loosemore <sandra@codesourcery.com>
* features/nios2-cpu.xml: Correct types of "gp", "fp", "ea", and

View File

@ -470,24 +470,24 @@ get_tcb_types_info (void)
C-like) lookups to get the first match. */
struct symbol *atcb_sym =
lookup_symbol_in_language (atcb_name, NULL, VAR_DOMAIN,
lookup_symbol_in_language (atcb_name, NULL, STRUCT_DOMAIN,
language_c, NULL);
const struct symbol *common_atcb_sym =
lookup_symbol_in_language (common_atcb_name, NULL, VAR_DOMAIN,
lookup_symbol_in_language (common_atcb_name, NULL, STRUCT_DOMAIN,
language_c, NULL);
const struct symbol *private_data_sym =
lookup_symbol_in_language (private_data_name, NULL, VAR_DOMAIN,
lookup_symbol_in_language (private_data_name, NULL, STRUCT_DOMAIN,
language_c, NULL);
const struct symbol *entry_call_record_sym =
lookup_symbol_in_language (entry_call_record_name, NULL, VAR_DOMAIN,
lookup_symbol_in_language (entry_call_record_name, NULL, STRUCT_DOMAIN,
language_c, NULL);
if (atcb_sym == NULL || atcb_sym->type == NULL)
{
/* In Ravenscar run-time libs, the ATCB does not have a dynamic
size, so the symbol name differs. */
atcb_sym = lookup_symbol_in_language (atcb_name_fixed, NULL, VAR_DOMAIN,
language_c, NULL);
atcb_sym = lookup_symbol_in_language (atcb_name_fixed, NULL,
STRUCT_DOMAIN, language_c, NULL);
if (atcb_sym == NULL || atcb_sym->type == NULL)
error (_("Cannot find Ada_Task_Control_Block type. Aborting"));