diff options
Diffstat (limited to 'gdb/guile')
| -rw-r--r-- | gdb/guile/scm-frame.c | 2 | ||||
| -rw-r--r-- | gdb/guile/scm-symbol.c | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/gdb/guile/scm-frame.c b/gdb/guile/scm-frame.c index 787b788..64ac0c0 100644 --- a/gdb/guile/scm-frame.c +++ b/gdb/guile/scm-frame.c @@ -911,7 +911,7 @@ gdbscm_frame_read_var (SCM self, SCM symbol_scm, SCM rest) { if (block == NULL) block = get_frame_block (frame, NULL); - var = lookup_symbol (var_name, block, VAR_DOMAIN, NULL); + var = lookup_symbol (var_name, block, VAR_DOMAIN, NULL).symbol; } CATCH (ex, RETURN_MASK_ALL) { diff --git a/gdb/guile/scm-symbol.c b/gdb/guile/scm-symbol.c index 99ef928..01c9eb1 100644 --- a/gdb/guile/scm-symbol.c +++ b/gdb/guile/scm-symbol.c @@ -617,7 +617,7 @@ gdbscm_lookup_symbol (SCM name_scm, SCM rest) TRY { - symbol = lookup_symbol (name, block, domain, &is_a_field_of_this); + symbol = lookup_symbol (name, block, domain, &is_a_field_of_this).symbol; } CATCH (ex, RETURN_MASK_ALL) { @@ -657,7 +657,7 @@ gdbscm_lookup_global_symbol (SCM name_scm, SCM rest) TRY { - symbol = lookup_global_symbol (name, NULL, domain); + symbol = lookup_global_symbol (name, NULL, domain).symbol; } CATCH (ex, RETURN_MASK_ALL) { |