From 85f6f60197fe56c90b663fb34db4cddf62c28c1b Mon Sep 17 00:00:00 2001 From: Justus Winter Date: Tue, 31 Jan 2017 12:43:00 +0100 Subject: gpgscm: Fix build with object list. * tests/gpgscm/scheme.c (oblist_add_by_name): Provide preallocation information if USE_OBJECT_LIST. Signed-off-by: Justus Winter --- scheme.c | 1 + 1 file changed, 1 insertion(+) diff --git a/scheme.c b/scheme.c index 27beb3a..1801ffc 100644 --- a/scheme.c +++ b/scheme.c @@ -1151,6 +1151,7 @@ static INLINE pointer oblist_find_by_name(scheme *sc, const char *name) /* returns the new symbol */ static pointer oblist_add_by_name(scheme *sc, const char *name) { +#define oblist_add_by_name_allocates 3 pointer x; x = immutable_cons(sc, mk_string(sc, name), sc->NIL); -- cgit v1.2.3