aboutsummaryrefslogtreecommitdiff
path: root/gdb/ax-gdb.c
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/ax-gdb.c')
-rw-r--r--gdb/ax-gdb.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/gdb/ax-gdb.c b/gdb/ax-gdb.c
index a55df32..de6f870 100644
--- a/gdb/ax-gdb.c
+++ b/gdb/ax-gdb.c
@@ -1155,7 +1155,7 @@ gen_deref (ax, value)
actually emit any code; we just change the type from "Pointer to
T" to "T", and mark the value as an lvalue in memory. Leave it
to the consumer to actually dereference it. */
- value->type = TYPE_TARGET_TYPE (value->type);
+ value->type = check_typedef (TYPE_TARGET_TYPE (value->type));
value->kind = ((value->type->code == TYPE_CODE_FUNC)
? axs_rvalue : axs_lvalue_memory);
}
@@ -1782,7 +1782,7 @@ expr_to_agent (expr, value)
struct agent_expr *ax = new_agent_expr ();
union exp_element *pc;
- old_chain = make_cleanup (free_agent_expr, ax);
+ old_chain = make_cleanup ((make_cleanup_func) free_agent_expr, ax);
pc = expr->elts;
trace_kludge = 0;
@@ -1836,7 +1836,7 @@ gen_trace_for_expr (expr)
union exp_element *pc;
struct axs_value value;
- old_chain = make_cleanup (free_agent_expr, ax);
+ old_chain = make_cleanup ((make_cleanup_func) free_agent_expr, ax);
pc = expr->elts;
trace_kludge = 1;
@@ -1905,9 +1905,9 @@ agent_command (exp, from_tty)
error_no_arg ("expression to translate");
expr = parse_expression (exp);
- old_chain = make_cleanup (free_current_contents, &expr);
+ old_chain = make_cleanup ((make_cleanup_func) free_current_contents, &expr);
agent = gen_trace_for_expr (expr);
- make_cleanup (free_agent_expr, agent);
+ make_cleanup ((make_cleanup_func) free_agent_expr, agent);
ax_print (gdb_stdout, agent);
ax_reqs (agent, &reqs);