aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org>2018-06-02 21:54:31 +0300
committerSergey Poznyakoff <gray@gnu.org>2018-06-02 21:54:31 +0300
commit8e10db4c37f308da9a58d3a4d15ef24f28d50161 (patch)
tree971beafe77f4eebd680ab76ac472de45d90c2c59
parent550c160236b3f1c62e55cfa076b639a8294f495c (diff)
downloadcfpeek-8e10db4c37f308da9a58d3a4d15ef24f28d50161.tar.gz
cfpeek-8e10db4c37f308da9a58d3a4d15ef24f28d50161.tar.bz2
Support for Guile 2.2.0
-rw-r--r--NEWS7
-rw-r--r--configure.ac2
-rw-r--r--src/guile.c2
3 files changed, 6 insertions, 5 deletions
diff --git a/NEWS b/NEWS
index 9d3fe87..e3f5acf 100644
--- a/NEWS
+++ b/NEWS
@@ -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);

Return to:

Send suggestions and report system problems to the System administrator.