* parse.c (write_exp_msymbol): Use new variables
msym_*_symbol_type as type of msymbol expression. (_initialize_parse): Initialize them.
This commit is contained in:
parent
23f61eaae8
commit
3fb93d868b
|
@ -1,3 +1,9 @@
|
||||||
|
Tue Jan 17 09:48:38 1995 Jim Kingdon <kingdon@lioth.cygnus.com>
|
||||||
|
|
||||||
|
* parse.c (write_exp_msymbol): Use new variables
|
||||||
|
msym_*_symbol_type as type of msymbol expression.
|
||||||
|
(_initialize_parse): Initialize them.
|
||||||
|
|
||||||
Mon Jan 16 18:11:03 1995 Stan Shebs <shebs@andros.cygnus.com>
|
Mon Jan 16 18:11:03 1995 Stan Shebs <shebs@andros.cygnus.com>
|
||||||
|
|
||||||
General cleanup and simplication of disassembler interface.
|
General cleanup and simplication of disassembler interface.
|
||||||
|
|
26
gdb/parse.c
26
gdb/parse.c
|
@ -355,7 +355,15 @@ write_exp_bitstring (str)
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Add the appropriate elements for a minimal symbol to the end of
|
/* Add the appropriate elements for a minimal symbol to the end of
|
||||||
the expression. */
|
the expression. The rationale behind passing in text_symbol_type and
|
||||||
|
data_symbol_type was so that Modula-2 could pass in WORD for
|
||||||
|
data_symbol_type. Perhaps it still is useful to have those types vary
|
||||||
|
based on the language, but they no longer have names like "int", so
|
||||||
|
the initial rationale is gone. */
|
||||||
|
|
||||||
|
static struct type *msym_text_symbol_type;
|
||||||
|
static struct type *msym_data_symbol_type;
|
||||||
|
static struct type *msym_unknown_symbol_type;
|
||||||
|
|
||||||
void
|
void
|
||||||
write_exp_msymbol (msymbol, text_symbol_type, data_symbol_type)
|
write_exp_msymbol (msymbol, text_symbol_type, data_symbol_type)
|
||||||
|
@ -374,18 +382,18 @@ write_exp_msymbol (msymbol, text_symbol_type, data_symbol_type)
|
||||||
case mst_text:
|
case mst_text:
|
||||||
case mst_file_text:
|
case mst_file_text:
|
||||||
case mst_solib_trampoline:
|
case mst_solib_trampoline:
|
||||||
write_exp_elt_type (text_symbol_type);
|
write_exp_elt_type (msym_text_symbol_type);
|
||||||
break;
|
break;
|
||||||
|
|
||||||
case mst_data:
|
case mst_data:
|
||||||
case mst_file_data:
|
case mst_file_data:
|
||||||
case mst_bss:
|
case mst_bss:
|
||||||
case mst_file_bss:
|
case mst_file_bss:
|
||||||
write_exp_elt_type (data_symbol_type);
|
write_exp_elt_type (msym_data_symbol_type);
|
||||||
break;
|
break;
|
||||||
|
|
||||||
default:
|
default:
|
||||||
write_exp_elt_type (builtin_type_char);
|
write_exp_elt_type (msym_unknown_symbol_type);
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
write_exp_elt_opcode (UNOP_MEMVAL);
|
write_exp_elt_opcode (UNOP_MEMVAL);
|
||||||
|
@ -902,4 +910,14 @@ _initialize_parse ()
|
||||||
type_stack_depth = 0;
|
type_stack_depth = 0;
|
||||||
type_stack = (union type_stack_elt *)
|
type_stack = (union type_stack_elt *)
|
||||||
xmalloc (type_stack_size * sizeof (*type_stack));
|
xmalloc (type_stack_size * sizeof (*type_stack));
|
||||||
|
|
||||||
|
msym_text_symbol_type =
|
||||||
|
init_type (TYPE_CODE_FUNC, 1, 0, "<text variable without -g>", NULL);
|
||||||
|
TYPE_TARGET_TYPE (msym_text_symbol_type) = builtin_type_int;
|
||||||
|
msym_data_symbol_type =
|
||||||
|
init_type (TYPE_CODE_INT, TARGET_INT_BIT / HOST_CHAR_BIT, 0,
|
||||||
|
"<data variable without -g>", NULL);
|
||||||
|
msym_unknown_symbol_type =
|
||||||
|
init_type (TYPE_CODE_INT, 1, 0, "<unknown segment variable without -g>",
|
||||||
|
NULL);
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue