diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2020-06-28 16:25:40 +0200 |
|---|---|---|
| committer | Simon Marchi <simon.marchi@efficios.com> | 2020-07-20 11:00:55 -0400 |
| commit | ae5369e773c341ab55a130fffb4678bb3595d692 (patch) | |
| tree | 209745e75f62eba0a5b42868a1f51ed42a14acd2 /gdb/guile/scm-math.c | |
| parent | 68cf161c24b096608bf4a1b97b489cc7277bffc0 (diff) | |
| download | gdb-ae5369e773c341ab55a130fffb4678bb3595d692.zip gdb-ae5369e773c341ab55a130fffb4678bb3595d692.tar.gz gdb-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/scm-math.c')
| -rw-r--r-- | gdb/guile/scm-math.c | 4 |
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); |