diff options
| author | Tom Tromey <tom@tromey.com> | 2016-04-27 10:28:56 -0600 |
|---|---|---|
| committer | Tom Tromey <tom@tromey.com> | 2016-05-17 12:02:03 -0600 |
| commit | 01739a3b6a564f6552acf6c01617aa21ab4d8833 (patch) | |
| tree | b5af9ea90a1d366d26463916b62ca45b4e86d308 /gdb/f-lang.h | |
| parent | 0bdfa368bc8dbea2f39706e34306c9b67883bbb1 (diff) | |
| download | gdb-01739a3b6a564f6552acf6c01617aa21ab4d8833.zip gdb-01739a3b6a564f6552acf6c01617aa21ab4d8833.tar.gz gdb-01739a3b6a564f6552acf6c01617aa21ab4d8833.tar.bz2 | |
Rename OP_F90_RANGE to OP_RANGE.
This renames OP_F90_RANGE to OP_RANGE, and similarly renames the
f90_range_type enum.
2016-05-17 Tom Tromey <tom@tromey.com>
* std-operator.def (OP_RANGE): Rename from OP_F90_RANGE.
* rust-lang.c: Don't include f-lang.h.
(rust_range, rust_compute_range, rust_subscript)
(rust_evaluate_subexp): Update.
* rust-exp.y: Don't include f-lang.h.
(ast_range, convert_ast_to_expression): Update.
* parse.c (operator_length_standard): Update.
* f-lang.h (enum f90_range_type): Move to expression.h.
* f-exp.y: Use OP_RANGE.
* expression.h (enum range_type): New enum; renamed from
f90_range_type.
* expprint.c: Don't include f-lang.h.
(print_subexp_standard, dump_subexp_body_standard): Use OP_RANGE.
* eval.c (value_f90_subarray, evaluate_subexp_standard): Update.
Diffstat (limited to 'gdb/f-lang.h')
| -rw-r--r-- | gdb/f-lang.h | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/gdb/f-lang.h b/gdb/f-lang.h index 45df770..827785a 100644 --- a/gdb/f-lang.h +++ b/gdb/f-lang.h @@ -37,19 +37,6 @@ extern void f_val_print (struct type *, const gdb_byte *, int, CORE_ADDR, /* Language-specific data structures */ -/* In F90 subrange expression, either bound could be empty, indicating that - its value is by default that of the corresponding bound of the array or - string. So we have four sorts of subrange in F90. This enumeration type - is to identify this. */ - -enum f90_range_type - { - BOTH_BOUND_DEFAULT, /* "(:)" */ - LOW_BOUND_DEFAULT, /* "(:high)" */ - HIGH_BOUND_DEFAULT, /* "(low:)" */ - NONE_BOUND_DEFAULT /* "(low:high)" */ - }; - /* A common block. */ struct common_block |