diff options
author | Sergey Poznyakoff <gray@gnu.org> | 2018-06-02 21:54:31 +0300 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org> | 2018-06-02 21:54:31 +0300 |
commit | 8e10db4c37f308da9a58d3a4d15ef24f28d50161 (patch) | |
tree | 971beafe77f4eebd680ab76ac472de45d90c2c59 | |
parent | 550c160236b3f1c62e55cfa076b639a8294f495c (diff) | |
download | cfpeek-8e10db4c37f308da9a58d3a4d15ef24f28d50161.tar.gz cfpeek-8e10db4c37f308da9a58d3a4d15ef24f28d50161.tar.bz2 |
Support for Guile 2.2.0
-rw-r--r-- | NEWS | 7 | ||||
-rw-r--r-- | configure.ac | 2 | ||||
-rw-r--r-- | src/guile.c | 2 |
3 files changed, 6 insertions, 5 deletions
@@ -1,8 +1,7 @@ -Cfpeek NEWS -- history of user-visible changes. 2015-05-15 -Copyright (C) 2011-2012, 2015 Sergey Poznyakoff +Cfpeek NEWS -- history of user-visible changes. 2018-06-02 See the end of file for copying conditions. Please send cfpeek bug reports to <bug-cfpeek@gnu.org.ua> Version 1.1.90 (Git) @@ -14,12 +13,14 @@ expression, i.e. an expression that will be evaluated when the main loop has iterated over all nodes in the tree. * New parser: DHCPD A parser for dhcpd.conf file. +* Drop support for Guile versions prior to 2.2.0 + Version 1.1, 2012-03-30 * New command line option --init (-i) * New format flags: down=N, child=S, sibling=S @@ -61,13 +62,13 @@ Version 1.0, 2011-05-27 Initial revision ========================================================================= Copyright information: -Copyright (C) 2011, 2012 Sergey Poznyakoff +Copyright (C) 2011-2018 Sergey Poznyakoff Permission is granted to anyone to make or distribute verbatim copies of this document as received, in any medium, provided that the copyright notice and this permission notice are preserved, thus giving the recipient permission to redistribute in turn. diff --git a/configure.ac b/configure.ac index 48dbb22..47f80eb 100644 --- a/configure.ac +++ b/configure.ac @@ -40,13 +40,13 @@ AC_HEADER_STDC # Grecs subsystem GRECS_SETUP(grecs, [tests getopt git2chg all-parsers syntax-doc]) # GINT -GINT_INIT([gint], [1.8 with-guile doc-distrib], [use_guile=yes], [use_guile=no]) +GINT_INIT([gint], [2.2.0 with-guile doc-distrib], [use_guile=yes], [use_guile=no]) AM_CONDITIONAL([CFPEEK_COND_GUILE],[test $use_guile = yes]) # Imprimatur IMPRIMATUR_INIT # Initialize the test suite. diff --git a/src/guile.c b/src/guile.c index f9e1e7b..771db95 100644 --- a/src/guile.c +++ b/src/guile.c @@ -124,13 +124,13 @@ node_match_to_scm(struct grecs_node *node, struct grecs_match_buf *match_buf) static SCM node_to_scm(struct grecs_node *node) { return node_match_to_scm(node, NULL); } -static scm_sizet +static size_t _guile_node_free(SCM smob) { struct _guile_node *np = (struct _guile_node *) SCM_CDR(smob); if (np->match_buf) grecs_match_buf_free(np->match_buf); free(np); |