aboutsummaryrefslogtreecommitdiff
path: root/gdb/guile
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-06-28 16:25:40 +0200
committerSimon Marchi <simon.marchi@efficios.com>2020-07-20 11:00:55 -0400
commitae5369e773c341ab55a130fffb4678bb3595d692 (patch)
tree209745e75f62eba0a5b42868a1f51ed42a14acd2 /gdb/guile
parent68cf161c24b096608bf4a1b97b489cc7277bffc0 (diff)
downloadbinutils-ae5369e773c341ab55a130fffb4678bb3595d692.zip
binutils-ae5369e773c341ab55a130fffb4678bb3595d692.tar.gz
binutils-ae5369e773c341ab55a130fffb4678bb3595d692.tar.bz2
guile: Add support for Guile 3.0.
gdb/ChangeLog 2020-06-28 Ludovic Courtès <ludo@gnu.org> * guile/scm-math.c (vlscm_integer_fits_p): Use 'uintmax_t' and 'intmax_t' instead of 'scm_t_uintmax' and 'scm_t_intmax', which are deprecated in Guile 3.0. * configure.ac (try_guile_versions): Add "guile-3.0". * configure (try_guile_versions): Regenerate. * NEWS: Update entry. gdb/testsuite/ChangeLog 2020-06-28 Ludovic Courtès <ludo@gnu.org> * gdb.guile/source2.scm: Add #f first argument to 'format'. * gdb.guile/types-module.exp: Remove "ERROR:" from regexps since Guile 3.0 no longer prints that. gdb/doc/ChangeLog 2020-06-28 Ludovic Courtès <ludo@gnu.org> * doc/guile.texi (Guile Introduction): Mention Guile 3.0. Change-Id: Iff116c2e40f334e4e0ca4e759a097bfd23634679
Diffstat (limited to 'gdb/guile')
-rw-r--r--gdb/guile/scm-math.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/guile/scm-math.c b/gdb/guile/scm-math.c
index 7c63fa2..419f509 100644
--- a/gdb/guile/scm-math.c
+++ b/gdb/guile/scm-math.c
@@ -578,7 +578,7 @@ vlscm_integer_fits_p (SCM obj, struct type *type)
ULONGEST max;
/* If scm_is_unsigned_integer can't work with this type, just punt. */
- if (TYPE_LENGTH (type) > sizeof (scm_t_uintmax))
+ if (TYPE_LENGTH (type) > sizeof (uintmax_t))
return 0;
get_unsigned_type_max (type, &max);
return scm_is_unsigned_integer (obj, 0, max);
@@ -588,7 +588,7 @@ vlscm_integer_fits_p (SCM obj, struct type *type)
LONGEST min, max;
/* If scm_is_signed_integer can't work with this type, just punt. */
- if (TYPE_LENGTH (type) > sizeof (scm_t_intmax))
+ if (TYPE_LENGTH (type) > sizeof (intmax_t))
return 0;
get_signed_type_minmax (type, &min, &max);
return scm_is_signed_integer (obj, min, max);