Fix ext lang calls to value_struct_elt.
gdb/ChangeLog: * guile/scm-value.c (gdbscm_value_field): Fix call to value_struct_elt. * python/py-value.c (valpy_getitem): Ditto.
This commit is contained in:
parent
ad9eb1fdda
commit
5996220cfa
@ -1,3 +1,8 @@
|
||||
2016-11-07 Doug Evans <dje@google.com>
|
||||
|
||||
* guile/scm-value.c (gdbscm_value_field): Fix call to value_struct_elt.
|
||||
* python/py-value.c (valpy_getitem): Ditto.
|
||||
|
||||
2016-11-07 Doug Evans <dje@google.com>
|
||||
|
||||
* i386-tdep.c (i386_gdbarch_init): Add comments.
|
||||
|
@ -726,7 +726,8 @@ gdbscm_value_field (SCM self, SCM field_scm)
|
||||
{
|
||||
struct value *tmp = value;
|
||||
|
||||
res_val = value_struct_elt (&tmp, NULL, field, NULL, NULL);
|
||||
res_val = value_struct_elt (&tmp, NULL, field, NULL,
|
||||
"struct/class/union");
|
||||
}
|
||||
CATCH (except, RETURN_MASK_ALL)
|
||||
{
|
||||
|
@ -754,7 +754,8 @@ valpy_getitem (PyObject *self, PyObject *key)
|
||||
struct value *res_val = NULL;
|
||||
|
||||
if (field)
|
||||
res_val = value_struct_elt (&tmp, NULL, field, 0, NULL);
|
||||
res_val = value_struct_elt (&tmp, NULL, field, NULL,
|
||||
"struct/class/union");
|
||||
else if (bitpos >= 0)
|
||||
res_val = value_struct_elt_bitpos (&tmp, bitpos, field_type,
|
||||
"struct/class/union");
|
||||
|
Loading…
x
Reference in New Issue
Block a user