From 7c15d377deefea39bac6ce710d803cc23cbe19c9 Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Mon, 8 Mar 2021 07:27:57 -0700 Subject: Implement some Ada unary operations This implements a few Ada unary operations, using the existing unop_operation template class. gdb/ChangeLog 2021-03-08 Tom Tromey * ada-lang.c (ada_unop_neg, ada_atr_tag, ada_atr_size, ada_abs): No longer static. * ada-exp.h (ada_neg_operation, ada_atr_tag_operation) (ada_atr_size_operation, ada_abs_operation): New typedefs. --- gdb/ada-lang.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'gdb/ada-lang.c') diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index dd88466..ed691f5 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -9964,7 +9964,7 @@ eval_ternop_in_range (struct type *expect_type, struct expression *exp, /* A helper function for UNOP_NEG. */ -static value * +value * ada_unop_neg (struct type *expect_type, struct expression *exp, enum noside noside, enum exp_opcode op, @@ -10015,7 +10015,7 @@ ada_unop_in_range (struct type *expect_type, /* A helper function for OP_ATR_TAG. */ -static value * +value * ada_atr_tag (struct type *expect_type, struct expression *exp, enum noside noside, enum exp_opcode op, @@ -10029,7 +10029,7 @@ ada_atr_tag (struct type *expect_type, /* A helper function for OP_ATR_SIZE. */ -static value * +value * ada_atr_size (struct type *expect_type, struct expression *exp, enum noside noside, enum exp_opcode op, @@ -10054,7 +10054,7 @@ ada_atr_size (struct type *expect_type, /* A helper function for UNOP_ABS. */ -static value * +value * ada_abs (struct type *expect_type, struct expression *exp, enum noside noside, enum exp_opcode op, -- cgit v1.1