diff options
| author | Andrew Burgess <andrew.burgess@embecosm.com> | 2020-05-07 16:27:16 +0100 |
|---|---|---|
| committer | Andrew Burgess <andrew.burgess@embecosm.com> | 2020-09-19 09:44:58 +0100 |
| commit | 6d81691950f8c4be4a49a85a672255c140e82468 (patch) | |
| tree | 66e445599cf0dbd55335407b53133901c35fefbe /gdb/std-operator.def | |
| parent | 8c37706a511209f6a92d887812c14e860c3bd0a0 (diff) | |
| download | gdb-6d81691950f8c4be4a49a85a672255c140e82468.zip gdb-6d81691950f8c4be4a49a85a672255c140e82468.tar.gz gdb-6d81691950f8c4be4a49a85a672255c140e82468.tar.bz2 | |
gdb/fortran: Move Fortran expression handling into f-lang.c
The Fortran specific OP_F77_UNDETERMINED_ARGLIST is currently handled
in the generic expression handling code. There's no reason why this
should be the case, so this commit moves handling of this into Fortran
specific files.
There should be no user visible changes after this commit.
gdb/ChangeLog:
* eval.c: Remove 'f-lang.h' include.
(value_f90_subarray): Moved to f-lang.c.
(eval_call): Renamed to...
(evaluate_subexp_do_call): ...this, is no longer static, header
comment moved into header file.
(evaluate_funcall): Update call to eval_call.
(skip_undetermined_arglist): Moved to f-lang.c.
(fortran_value_subarray): Likewise.
(evaluate_subexp_standard): OP_F77_UNDETERMINED_ARGLIST handling
moved to evaluate_subexp_f.
(calc_f77_array_dims): Moved to f-lang.c
* expprint.c (print_subexp_funcall): New function.
(print_subexp_standard): OP_F77_UNDETERMINED_ARGLIST handling
moved to print_subexp_f, OP_FUNCALL uses new function.
(dump_subexp_body_funcall): New function.
(dump_subexp_body_standard): OP_F77_UNDETERMINED_ARGLIST handling
moved to dump_subexp_f, OP_FUNCALL uses new function.
* expression.h (evaluate_subexp_do_call): Declare.
* f-lang.c (value_f90_subarray): Moved from eval.c.
(skip_undetermined_arglist): Likewise.
(calc_f77_array_dims): Likewise.
(fortran_value_subarray): Likewise.
(evaluate_subexp_f): Add OP_F77_UNDETERMINED_ARGLIST support.
(operator_length_f): Likewise.
(print_subexp_f): Likewise.
(dump_subexp_body_f): Likewise.
* fortran-operator.def (OP_F77_UNDETERMINED_ARGLIST): Move
declaration of this operation to here.
* parse.c (operator_length_standard): OP_F77_UNDETERMINED_ARGLIST
support moved to operator_length_f.
* parser-defs.h (dump_subexp_body_funcall): Declare.
(print_subexp_funcall): Declare.
* std-operator.def (OP_F77_UNDETERMINED_ARGLIST): Moved to
fortran-operator.def.
Diffstat (limited to 'gdb/std-operator.def')
| -rw-r--r-- | gdb/std-operator.def | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/gdb/std-operator.def b/gdb/std-operator.def index e969bdc..6f90875 100644 --- a/gdb/std-operator.def +++ b/gdb/std-operator.def @@ -168,14 +168,6 @@ OP (OP_FUNCALL) pointer. This is an Objective C message. */ OP (OP_OBJC_MSGCALL) -/* This is EXACTLY like OP_FUNCALL but is semantically different. - In F77, array subscript expressions, substring expressions and - function calls are all exactly the same syntactically. They - may only be disambiguated at runtime. Thus this operator, - which indicates that we have found something of the form - <name> ( <stuff> ). */ -OP (OP_F77_UNDETERMINED_ARGLIST) - /* OP_COMPLEX takes a type in the following element, followed by another OP_COMPLEX, making three exp_elements. It is followed by two double args, and converts them into a complex number of the given type. */ |