mirror of
https://github.com/bminor/binutils-gdb.git
synced 2025-12-29 02:20:51 +00:00
Introduce ada_qual_operation
This adds class ada_qual_operation, which implements UNOP_QUAL. gdb/ChangeLog 2021-03-08 Tom Tromey <tom@tromey.com> * ada-lang.c (ada_qual_operation::evaluate): New method. * ada-exp.h (class ada_qual_operation): New.
This commit is contained in:
@@ -55,6 +55,22 @@ public:
|
||||
enum noside noside) override;
|
||||
};
|
||||
|
||||
/* The Ada TYPE'(EXP) construct. */
|
||||
class ada_qual_operation
|
||||
: public tuple_holding_operation<operation_up, struct type *>
|
||||
{
|
||||
public:
|
||||
|
||||
using tuple_holding_operation::tuple_holding_operation;
|
||||
|
||||
value *evaluate (struct type *expect_type,
|
||||
struct expression *exp,
|
||||
enum noside noside) override;
|
||||
|
||||
enum exp_opcode opcode () const override
|
||||
{ return UNOP_QUAL; }
|
||||
};
|
||||
|
||||
} /* namespace expr */
|
||||
|
||||
#endif /* ADA_EXP_H */
|
||||
|
||||
Reference in New Issue
Block a user