diff options
| author | Tom Tromey <tom@tromey.com> | 2019-03-24 21:38:40 -0600 |
|---|---|---|
| committer | Tom Tromey <tom@tromey.com> | 2019-04-04 19:55:11 -0600 |
| commit | 43476f0b1b628352ad8e3064e50128cb3461d3d0 (patch) | |
| tree | 5d836e9a33199397d2aeba188216a6478688ca94 /gdb/f-exp.y | |
| parent | 5776fca307b8af3d852525b77e9b917a9aa97370 (diff) | |
| download | gdb-43476f0b1b628352ad8e3064e50128cb3461d3d0.zip gdb-43476f0b1b628352ad8e3064e50128cb3461d3d0.tar.gz gdb-43476f0b1b628352ad8e3064e50128cb3461d3d0.tar.bz2 | |
Move arglist_len et al to parser_state
This moves arglist_len, start_arglist, and end_arglist to
parser_state.
gdb/ChangeLog
2019-04-04 Tom Tromey <tom@tromey.com>
* parser-defs.h (struct parser_state) <start_arglist,
end_arglist>: New methods.
<arglist_len, m_funcall_chain>: New members.
(arglist_len, start_arglist, end_arglist): Don't declare.
* parse.c (arglist_len, funcall_chain): Remove global.
(start_arglist, end_arglist): Remove functions.
(parse_exp_in_context): Update.
* p-exp.y: Update rules.
* m2-exp.y: Update rules.
* go-exp.y: Update rules.
* f-exp.y: Update rules.
* d-exp.y: Update rules.
* c-exp.y: Update rules.
Diffstat (limited to 'gdb/f-exp.y')
| -rw-r--r-- | gdb/f-exp.y | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gdb/f-exp.y b/gdb/f-exp.y index fce90b4..da47322 100644 --- a/gdb/f-exp.y +++ b/gdb/f-exp.y @@ -245,12 +245,12 @@ exp : KIND '(' exp ')' %prec UNARY later in eval.c. */ exp : exp '(' - { start_arglist (); } + { pstate->start_arglist (); } arglist ')' { write_exp_elt_opcode (pstate, OP_F77_UNDETERMINED_ARGLIST); write_exp_elt_longcst (pstate, - (LONGEST) end_arglist ()); + pstate->end_arglist ()); write_exp_elt_opcode (pstate, OP_F77_UNDETERMINED_ARGLIST); } ; @@ -263,15 +263,15 @@ arglist : ; arglist : exp - { arglist_len = 1; } + { pstate->arglist_len = 1; } ; arglist : subrange - { arglist_len = 1; } + { pstate->arglist_len = 1; } ; arglist : arglist ',' exp %prec ABOVE_COMMA - { arglist_len++; } + { pstate->arglist_len++; } ; /* There are four sorts of subrange types in F90. */ |