diff options
Diffstat (limited to 'gdb/scm-exp.c')
-rw-r--r-- | gdb/scm-exp.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/scm-exp.c b/gdb/scm-exp.c index 41d78af..0de7428 100644 --- a/gdb/scm-exp.c +++ b/gdb/scm-exp.c @@ -310,10 +310,10 @@ tryagain: if (!skipping) { struct value *val = scm_evaluate_string (str.ptr, lexptr - str.ptr); - if (!is_scmvalue_type (VALUE_TYPE (val))) + if (!is_scmvalue_type (value_type (val))) error ("quoted scm form yields non-SCM value"); svalue = extract_signed_integer (VALUE_CONTENTS (val), - TYPE_LENGTH (VALUE_TYPE (val))); + TYPE_LENGTH (value_type (val))); goto handle_immediate; } return; |