diff options
Diffstat (limited to 'gdb/scm-exp.c')
| -rw-r--r-- | gdb/scm-exp.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gdb/scm-exp.c b/gdb/scm-exp.c index 0de7428..529d278 100644 --- a/gdb/scm-exp.c +++ b/gdb/scm-exp.c @@ -1,6 +1,7 @@ /* Scheme/Guile language support routines for GDB, the GNU debugger. - Copyright 1995, 1996, 2000, 2003 Free Software Foundation, Inc. + Copyright 1995, 1996, 2000, 2003, 2005 Free Software Foundation, + Inc. This file is part of GDB. @@ -312,7 +313,7 @@ tryagain: struct value *val = scm_evaluate_string (str.ptr, lexptr - str.ptr); if (!is_scmvalue_type (value_type (val))) error ("quoted scm form yields non-SCM value"); - svalue = extract_signed_integer (VALUE_CONTENTS (val), + svalue = extract_signed_integer (value_contents (val), TYPE_LENGTH (value_type (val))); goto handle_immediate; } |