diff options
| author | Per Bothner <per@bothner.com> | 1995-09-27 18:47:22 +0000 |
|---|---|---|
| committer | Per Bothner <per@bothner.com> | 1995-09-27 18:47:22 +0000 |
| commit | 4c2260aa5c261f7bfb26dcf3aa7c67876720b17e (patch) | |
| tree | 86f33728b080a270aa4ff0d53cb6e3800c26ba2e | |
| parent | 1293a6fc03f13a929b5c8b18526ad6d4aca85ee4 (diff) | |
| download | gdb-4c2260aa5c261f7bfb26dcf3aa7c67876720b17e.zip gdb-4c2260aa5c261f7bfb26dcf3aa7c67876720b17e.tar.gz gdb-4c2260aa5c261f7bfb26dcf3aa7c67876720b17e.tar.bz2 | |
* valops.c (search_struct_field): Also allow "else" as a variant name,
| -rw-r--r-- | gdb/ChangeLog | 2 | ||||
| -rw-r--r-- | gdb/valops.c | 5 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index fe104ce..49ff547 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,7 @@ Wed Sep 27 10:14:36 1995 Per Bothner <bothner@kalessin.cygnus.com> + * valops.c (search_struct_field): Also allow "else" as a variant name, + * eval.c (evaluate_struct_tuple): New function. Used to evaluate structure tuples. Now also handles Chill variant records. (get_label): New function, used by evaluate_struct_tuple. diff --git a/gdb/valops.c b/gdb/valops.c index 46a22a2..b4bfde8 100644 --- a/gdb/valops.c +++ b/gdb/valops.c @@ -1536,7 +1536,10 @@ search_struct_field (name, arg1, offset, type, looking_for_baseclass) return v; } - if (t_field_name && t_field_name[0] == '\0') + if (t_field_name + && (t_field_name[0] == '\0' + || (TYPE_CODE (type) == TYPE_CODE_UNION + && STREQ (t_field_name, "else")))) { struct type *field_type = TYPE_FIELD_TYPE (type, i); if (TYPE_CODE (field_type) == TYPE_CODE_UNION |