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:
parent
d80285301a
commit
318d3177f7
@ -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
|
||||
|
@ -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"));
|
||||
|
Loading…
x
Reference in New Issue
Block a user