projects
/
deliverable
/
binutils-gdb.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Make the objfile destructor private
[deliverable/binutils-gdb.git]
/
gdb
/
ada-exp.y
diff --git
a/gdb/ada-exp.y
b/gdb/ada-exp.y
index f36aabaf15001a3dcc796f8521bcf14bb98d5807..00020cd0677b1aa241b9dd2feb474508cb1f8ad1 100644
(file)
--- a/
gdb/ada-exp.y
+++ b/
gdb/ada-exp.y
@@
-816,7
+816,7
@@
write_object_renaming (struct parser_state *par_state,
renamed_entity_len);
ada_lookup_encoded_symbol (name, orig_left_context, VAR_DOMAIN, &sym_info);
if (sym_info.symbol == NULL)
renamed_entity_len);
ada_lookup_encoded_symbol (name, orig_left_context, VAR_DOMAIN, &sym_info);
if (sym_info.symbol == NULL)
- error (_("Could not find renamed variable: %s"), ada_decode (name));
+ error (_("Could not find renamed variable: %s"), ada_decode (name)
.c_str ()
);
else if (SYMBOL_CLASS (sym_info.symbol) == LOC_TYPEDEF)
/* We have a renaming of an old-style renaming symbol. Don't
trust the block information. */
else if (SYMBOL_CLASS (sym_info.symbol) == LOC_TYPEDEF)
/* We have a renaming of an old-style renaming symbol. Don't
trust the block information. */
@@
-1102,11
+1102,10
@@
static void
write_ambiguous_var (struct parser_state *par_state,
const struct block *block, char *name, int len)
{
write_ambiguous_var (struct parser_state *par_state,
const struct block *block, char *name, int len)
{
- struct symbol *sym =
XOBNEW (&temp_parse_space, struct symbol
);
+ struct symbol *sym =
new (&temp_parse_space) symbol (
);
- memset (sym, 0, sizeof (struct symbol));
SYMBOL_DOMAIN (sym) = UNDEF_DOMAIN;
SYMBOL_DOMAIN (sym) = UNDEF_DOMAIN;
-
SYMBOL_LINKAGE_NAME (sym) = obstack_strndup (&temp_parse_space, name, len
);
+
sym->set_linkage_name (obstack_strndup (&temp_parse_space, name, len)
);
SYMBOL_LANGUAGE (sym) = language_ada;
write_exp_elt_opcode (par_state, OP_VAR_VALUE);
SYMBOL_LANGUAGE (sym) = language_ada;
write_exp_elt_opcode (par_state, OP_VAR_VALUE);
@@
-1390,7
+1389,10
@@
convert_char_literal (struct type *type, LONGEST val)
if (TYPE_CODE (type) != TYPE_CODE_ENUM)
return val;
if (TYPE_CODE (type) != TYPE_CODE_ENUM)
return val;
- xsnprintf (name, sizeof (name), "QU%02x", (int) val);
+ if ((val >= 'a' && val <= 'z') || (val >= '0' && val <= '9'))
+ xsnprintf (name, sizeof (name), "Q%c", (int) val);
+ else
+ xsnprintf (name, sizeof (name), "QU%02x", (int) val);
size_t len = strlen (name);
for (f = 0; f < TYPE_NFIELDS (type); f += 1)
{
size_t len = strlen (name);
for (f = 0; f < TYPE_NFIELDS (type); f += 1)
{
This page took
0.028722 seconds
and
4
git commands to generate.